﻿Return
00356317-C8AE-454B-9D60-0611B4F369FB:
;&P  复制快捷方式目标路径
MySel :=QZData("files")
FileGetShortcut,%MySel%,MyTempfile
clipboard := MyTempfile
Return
003E53A7-F9C3-468D-835E-5803F2C32A41:
;TC_导航:字体
QZTC_cm_OpenFonts()
Return
0040B539-2A84-4EC9-9827-E3C8D767BFC6:
;Word_居中
Word_setAlignment("C")
Return
0055EF6A-FB7D-4397-B239-18C7C818103C:
;Word_大纲-9级目录
Word_setParagraphs_Style(9)
Return
0057C82D-807C-4E2A-9AF8-CD02C7DCC30E:
;TC_排序:目标窗口:按第5列排序
QZTC_cm_TrgSortByCol5()
Return
00B12AFD-297E-48A8-9C55-5BC7D1C14186:
;Excel_格式-字号变大
Excel_Format_SetFontSize("+1")
Return
012DB93B-C4A4-44D1-AE06-9A0558271D26:
;TC_工具:同步文件夹
QZTC_cm_FileSync()
Return
0217BB35-93C4-4EFA-98E3-3597FDF947DB:
;Excel_行-删除选中行
Excel_Row_DeleteSelect()
Return
0270DEAC-F512-4F52-9E2C-8F713A29B356:
;QQ浏览器_切换到【VIM模式】
send,{esc}
vimd.changemode("VIM模式")
MsgBox, 0, 提示, 【VIM模式】, 0.3
Return
02B257FD-5CDA-4CFA-AC0F-540F57E7C21B:
;Excel_工作表循环-切换工作表
Excel_Worksheet_Switch()
Return
0308B734-8104-4502-9D6E-72F71F1A5EBC:
;Excel_格式-小数点1位
Excel_Format_SetDecimalNum(1)
Return
034EB05E-3535-47FB-8408-9D99BCCE77D0:
;TC_标签:新建标签(并打开光标处的文件夹)
QZTC_cm_OpenDirInNewTab()
Return
03B3552F-3E5B-432C-B2F8-EA4BE4697BE0:
;TC_剪贴板:从剪贴板粘贴到当前文件夹
QZTC_cm_PasteFromClipboard()
Return
03BB9CDD-5F65-4D4B-BEF1-A91472298B6D:
;TC_配置:插件
QZTC_cm_PluginsConfig()
Return
03BF54C4-7EF8-436F-8F34-EB561DAB9DF5:
;TC_配置:操作方式
QZTC_cm_Config2()
Return
043849DA-31BD-446A-A034-C3636F136F70:
;Word_大纲-6级目录
Word_setParagraphs_Style(6)
Return
04C695A3-56B6-4B24-A3EE-043C7B517C73:
;Excel_运行宏-临时3
;comObjactive("excel.application").run("Personal.xlsb!公式类_2粘贴数据公式")
;excel:=Excel_Get()
;sendinput,^{enter}
;sleep,300
global excel
Excel_Get()
excel.Cells(1,6).select
Excel_Destroy()
Return
05AB8194-8CAE-469B-88CB-5C32DAAF70E4:
;TC_VIM:多个文件一次性连续打开
TC_MultiFilePersistOpen()
Return
05D0E6F0-038D-4619-8A11-BECD8AF532C7:
;Phantom_文件-从多文档创建PDF
;^f12::
gui Destroy
gui New
Gui Font, s12
Gui Add, Text, x10 y15 w85 h26 +0x200, 文件目录：
Gui Add, Edit, x100 y15 w384 h26 vMyVar_FileDir
Gui Add, Button, x490 y15 w70 h26, PDF浏览
Gui Add, ComboBox, x100 y50 w160 vMyVar_FileExt,pdf|jpg|png|bmp 
Gui Add, Text, x10 y47 w85 h30 +0x200, 文件格式：
Gui Add, Edit, x10 y85 w550 h500 vMyVar_FileList
Gui Add, Button, x110 y600 w75 h39, PDF合并
Gui Add, Button, x250 y600 w75 h39, PDF清空
Gui Add, Button, x390 y600 w75 h39, PDF退出
Gui Font
Gui Show, w570 h650, 批量合并文件
Return

ButtonPDF浏览:
	;~ Gui PDFMarge:Default
	FileSelectFolder, MyVar_FileDir
	if ErrorLevel
		return
	if (MyVar_FileDir="")
		return
	MyVar_FileDir := RegExReplace(MyVar_FileDir, "\\$")  ; 移除默认的反斜线,如果存在.
	guicontrol,,MyVar_FileDir,%MyVar_FileDir%
return

ButtonPDF合并:
	;~ Gui PDFMarge:Default
	gui,Submit
	NotExistList:=
	ExistList:=
	if (MyVar_FileExt="")
		msgbox ,请选择文件后缀名！
	loop,Parse,MyVar_FileList,`n,`r
	{
		TemFileNameNoExt:=trim(A_LoopField)
		if (TemFileNameNoExt="")
			continue
		TemFileFullPath=%MyVar_FileDir%\%TemFileNameNoExt%.%MyVar_FileExt%
		ifnotexist,%TemFileFullPath%
			NotExistList.=TemFileNameNoExt "." MyVar_FileExt "`n" 
		else
			ExistList.=TemFileFullPath "`n" 
	}
	NotExistList:=RegExReplace(NotExistList,"\s*$","")   ;顺便删除最后的空白行，可根据需求注释掉
	ExistList:=RegExReplace(ExistList,"\s*$","")   ;顺便删除最后的空白行，可根据需求注释掉
	if strlen(NotExistList)
	{
		Clipboard=%NotExistList%
		MsgBox, 4, 提示, 以下文件不存在，是否继续？`n文件列表已复制到剪贴板，如有需要，请先粘贴保存`n`n%NotExistList%
	}
	IfMsgBox ,no
		goto ,ButtonPDF退出
	;AppPath:="C:\Program Files (x86)\foxit software\foxit phantom\Foxit Phantom.exe"
	AppPath:=QZData( "%Foxit_Phantom%" )
	run,"%AppPath%"
	sleep,2000
	#WinActivateForce
	WinActivate,,ahk_class classFoxitPhantom
	;~ sleep,1500
	sendinput,!f
	sleep,100
	sendinput,f
	sleep,100
	sendinput,m
	;~ ControlClick,Button2,多文档转换
	sendinput,{tab}
	loop,Parse,ExistList,`n,`r
	{
		TemFileFullPath:=trim(A_LoopField)
		;~ msgbox % TemFileFullPath
		sendinput,{enter}
		sleep,300
		Clipboard=%TemFileFullPath%
		;~ sendinput,{Raw}%TemFileFullPath%
		sendinput,^v
		sleep,300
		sendinput,{enter}
	}
	sendinput,!m
	goto ,ButtonPDF退出
return

ButtonPDF清空:
	;~ Gui PDFMarge:Default
	guicontrol,,MyVar_FileDir,
	guicontrol,,MyVar_FileList,
	guicontrol,,MyVar_FileExt,||
	guicontrol,,MyVar_FileExt,pdf|jpg|png|bmp 
	MyVar_FileDir:=
	MyVar_FileList:=
	MyVar_FileExt:=
return

ButtonPDF退出:
	;~ Gui PDFMarge:Destroy
    gui,Destroy
Return
05E84F4F-D6C2-415E-AB0B-CE887910F045:
;Excel_列-列宽减小
Excel_Column_SetWidth("-1")
Return
0631FCA2-1C78-4695-969A-750F62455A85:
;FastStone_向左旋转并保存
WinGetClass, CurTitle,A
if RegExMatch(CurTitle,"TFullScreenWindow")		;ahk_class TFullScreenWindow
{
	sendinput,^!l
}
if RegExmatch(CurTitle,"FastStoneImageViewerMainForm")		;ahk_class FastStoneImageViewerMainForm.UnicodeClass
{
	WinMenuSelectItem, A, , 工具, JPEG 无损旋转图像,向左旋转
	;sendinput,^!l
}

Return
06C81669-A78A-4C7A-AEF1-494F75B6A61A:
;Word_插入-日期（2017/12/31）
Word_Insert_Date("/")
Return
06E47A74-E7B7-4D67-AC3E-9B42D9729A26:
;TC_VIM:创建当前光标下文件的快捷方式
TC_CreateFileShortcut()
Return
06EF939B-432E-4BDC-A3D6-F5EF25900C07:
;Word_页面设置对话框
Word_Dialogs_PageSetup()
Return
07194DC2-101B-4948-8ADD-0A7592B717DB:
;TC_视图:显示/隐藏:状态栏
QZTC_cm_VisStatusbar()
Return
0785B1E9-2764-4C23-A494-9AEC29285702:
;&Z  打开快捷方式所指目录(资源管理器)
MySel:=QZData("files" )
FileGetShortcut,%MySel%,MyTemFile
SplitPath,MyTemFile,,MyOutDir
;MyCmdLine=explorer.exe /select,%dir%
;msgbox % MyCmdLine
;run,% MyCmdLine
;Run,explorer.exe /select`,%MyOutDir%
Run,explorer.exe /open`,%MyOutDir%
;Run,% "explorer.exe /select,dir"
;Run, % "explorer.exe /open,dir"
Return
07B7D7D9-797A-49F8-A042-DC68C014416A:
;Word_临时命令

Return
07E53524-1B49-420E-97E4-B76DF8888D65:
;Excel_格式-指定填充/字体颜色
Excel_Format_SetColor()
Return
07F499CB-F190-4171-861B-F682E69F1BC6:
;Excel_格式-对齐-水平-右对齐
Excel_Format_SetAlignment("水平","右对齐")
Return
0813A215-4980-4D73-B299-4A6169022A19:
;TC_排序:来源窗口:按第10列排序
;QZTC_cm_SrcSortByCol10()
Return
088D2FC7-E927-4646-8BB9-8AF390D14066:
;TC_剪贴板:复制文件详细信息及网络路径
QZTC_cm_CopyNetFileDetailsToClip()
Return
08A51B21-4DE3-434D-8F07-005E8FC5E8FF:
;Word_段落行距-单倍(1)
Word_setLineSpacing(1)
Return
08DB1B7B-C203-445F-8B5A-55D579FAC06D:
;TC_选择:不选文件名相同的文件
QZTC_cm_UnselectCurrentName()
Return
08DCDEBA-C0C6-4062-96B7-7046F1DF1D52:
;TC_左窗口:按扩展名排序
QZTC_cm_LeftByExt()
Return
08EA0F79-182E-4C03-8183-D892174E7359:
;TC_VIM:文件操作-删除图片类文件
;TC_Delete_Picture()
TC_DeleteByExt("jpg,jpeg,gif,png")
Return
091855CF-8A5C-4140-8FAA-B79CF50CE1A8:
;Excel_列-插入列-当前单元格左侧
Excel_Column_Insert("L")
Return
097BC415-F134-4383-AC9B-35D321614635:
;Excel_列-插入列-当前单元格右侧
Excel_Column_Insert("R")
Return
099707F4-F04A-4C17-B16C-7040477E27E5:
;TC_来源窗口:上次选中的文件
QZTC_cm_SrcUserSpec()
Return
09AD3AF2-2CD5-4E3F-BCE1-7A91BE72251D:
;TC_文件操作:更改属性
QZTC_cm_SetAttrib()
Return
09ADCED8-5F15-46E7-8A6E-EC30E63BCD39:
;&P  Ping测试（列表标签）
List:=QZData("{box:list[www.163.com][114.114.114.114][www.baidu.com]}")
;msgbox % List

run cmd.exe /k ping %list% -t
Return
09CE9C4D-CCBC-4049-9635-887E949DA58B:
;&T 在TC中打开
ExplorerPath := QZData("text")
TLAppPath:=QZData("%TOTALCMD%")
ifnotexist,%TLAppPath%
	return
IfWinNotExist	ahk_class TTOTAL_CMD
	Run,%TLAppPath%,,Max
IfWinNotActive ahk_class TTOTAL_CMD
{
	Postmessage, 1075, 2015, 0,, ahk_class TTOTAL_CMD	;最大化
	WinWait,ahk_class TTOTAL_CMD
	WinActivate
}
PostMessage 1075, 3001, 0, , AHK_CLASS TTOTAL_CMD
ControlSetText, Edit1, cd %ExplorerPath%, ahk_class TTOTAL_CMD
Sleep,400
ControlSend, Edit1, {Enter}, ahk_class TTOTAL_CMD
return
Return
09D7ED8D-2014-4A17-921B-67489F5528CF:
;TC_左窗口:快速查看(不用插件)
QZTC_cm_LeftQuickInternalOnly()
Return
09EFE58B-699C-47A4-AF43-D312E7932846:
;TC_导航:常用文件夹
;QZTC_cm_DirectoryHotlist()
TC_DirectoryHotlist()
Return
0A3B7A9F-1B1D-4C15-B84B-AF50C241C352:
;TC_自定义列视图:来源窗口:自定义列视图5
QZTC_cm_SrcCustomView5()
Return
0A8586C6-CA70-4C90-8458-C1899935B2A0:
;Excel_工作表-删除当前工作表
Excel_Worksheet_DeleteCurrent()
Return
0AC4D9BA-3AE7-4CDE-A81B-5B55F6D24178:
;TC_其他:光标置于右窗口
QZTC_cm_FocusRight()
Return
0AEEC2E7-C6F0-4387-A31E-B65F2234CC6C:
;TC_视图:开启/关闭:长文件名显示
QZTC_cm_SwitchLongNames()
Return
0B094606-D0F3-42F6-A971-7051A9E133BC:
;TC_选中目录在【右侧窗口】新建标签并激活
;Postmessage, 1075, 3004, 0,, ahk_class TTOTAL_CMD
sendinput,^{right}
Return
0B6386E7-FD73-4A0E-93F8-255720530D9E:
;TC_配置:更改当前自定义列
QZTC_cm_CustomColumnDlg()
Return
0BCAB1C4-9DA0-408E-B32C-AF5529B0A8DF:
;Word_大纲-目录降级(1-9,正文)
Word_setParagraphs_Demote()
Return
0C57B6FA-C2C1-4522-AF40-0A4BBBB65D7A:
;TC_自定义列视图:左窗口:下一个自定义视图
QZTC_cm_LeftNextCustomView()
Return
0CEDEA7D-6B7D-46F2-8CE0-AE8C8D96C34F:
;TC_配置:日志文件
QZTC_cm_LogConfig()
Return
0D015C66-D6FD-4559-9FDE-96F0C824B7E2:
;PotPlayer_前进
sendinput,{right}
Return
0D1CAFDE-12A1-4610-B957-08AB8B91712E:
;TC_VIM:向上选择
TC_UpSelect()
Return
0D9D2C36-E86A-4453-961C-8025129D619C:
;&A  提取全部链接
MySel:=QZData("{text}")
ZZIni=%A_ScriptDir%\User\我的常用正则表达式.txt
fileread,AllZZExpress,%ZZIni%
ZZName:=[]
ZZExpress:=[]
loop ,Parse ,AllZZExpress,`n
{
	StrLine:=trim(A_LoopField)
	if (substr(StrLine,1,3)="功能：") or  (substr(StrLine,1,3)="功能:") {
		StrLine:=StrReplace(StrLine,"功能：","")
		StrLine:=StrReplace(StrLine,"功能:","")
		ZZName.push(StrLine)
		continue
	}
	if (substr(StrLine,1,4)="表达式：") or  (substr(StrLine,1,4)="表达式:") {
		StrLine:=StrReplace(StrLine,"表达式：","")
		StrLine:=StrReplace(StrLine,"表达式:","")
		ZZExpress.push(StrLine)
	}
}
Gui Add, Text, x11 y6 w65 h23 +0x200, 正则表达式
Gui Add, Edit, x80 y8 w392 h21 vMyExpress, 
Gui Add, ListView, x9 y72 w464 h265  AltSubmit gZZMyListViewClick, 作用|正则表达式
Gui Add, Button, x80 y39 w65 h25 gZZClean, 清除
Gui Add, Button, x225 y39 w65 h25 gZZOK, 提取
Gui Add, Button, x405 y39 w65 h25 gZZEdit, 编辑列表
loop,% ZZName.Length()
	LV_Add("",A_index . "." . ZZName[A_index] , ZZExpress[A_index])
;~ LV_ModifyCol()  
LV_modifycol(1,200)
LV_modifycol(2,250)
Gui Show, w480 h345, 表达式规则


ZZMyListViewClick:
	if A_GuiEvent =Normal 
	{
		LV_GetText(LvText,A_EventInfo,2)
		guiControl,,MyExpress,%LvText%
	}
return
	
ZZClean:
	guiControl,,MyExpress,
return

ZZEdit:
	run,%ZZIni%
return

ZZOK:
	GuiControlGet,MyExpress,,MyExpress
	MyMatchArray:=MyFun_RegExMatchAll(MySel,MyExpress)
	OutStr:=""
	i:=1
	while (i<=MyMatchArray.maxindex())
	{
		OutStr.= MyMatchArray[i]  "`n"
		i+=1
	}
	OutStr:=RegExReplace(OutStr,"\s*$","")   ;顺便删除最后的空白行，可根据需求注释掉
	MsgBox, 36, 提取到的数据, %OutStr%`n`n是否复制到 【剪贴板】 ？
	IfMsgBox,Yes
		Clipboard:=OutStr
	gui,Destroy
return

MyFun_RegExMatchAll(ByRef Haystack,NeedleRegEx,SubPat="")
{
	arr:=[],startpos:=1
	while (pos:=Regexmatch(Haystack,NeedleRegEx,match,startPos))
	{
		arr.push(match%SubPat%)
		startPos:=pos+StrLen(match)
	}
	;~ msgbox % arr.MaxIndex()
	return arr.maxindex() ? arr : ""
}
Return
0E1BFE70-D543-4E93-8A56-3FD7E4FF90CD:
;Excel_其他-批注-添加
Excel_Comment_Add()
Return
0F12C31B-430B-4818-BCB3-C19AFC32A8FD:
;TC_导航:转到下一个驱动器
QZTC_cm_GotoNextDrive()
Return
0F828A3C-4FE6-446F-B956-ED8CF14E8704:
;&T 测试这段 AHK 代码 PipeRun
CustomFunc_PipeRun(gMenuZ.Data.text)
return
Return
0FB56216-D1BE-4FB0-898B-469D16C6E30C:
;TC_标签:右窗口:激活标签1
QZTC_cm_RightActivateTab1()
Return
0FC6CF96-6DFE-443A-BDD5-049CD0A928E1:
;TC_选择:选择一组:仅文件
QZTC_cm_SelectFiles()
Return
1071C56C-E36E-43D9-BC6F-91D0EF3763F9:
;Excel_视图-切换正常查看/分页预览
Excel_View_NormalOrPageBreak()
Return
1072E128-F4ED-4EE6-9150-8C336C94DAC0:
;Word_粘贴为无格式文本
Word_PastePlainText()
Return
10B052F9-83CF-4BF2-9B1B-F74298633D59:
;&5  压缩50% 以BetterJPEG
SelPath:=QZData("files")
MyAppPath:=QZData("%BetterJPEG%")
Run,%MyAppPath%,,Max

WinWait,ahk_exe BetterJPEG.exe,,5
if ErrorLevel		;如果5秒没激活，则退出
	return
WinActivate
ControlSetText,Edit1,%SelPath%,A
sleep,100
controlsend,Edit1,{enter}
sleep,2500
;~ WinMenuSelectItem,a,,文件,选择所有项目
ControlClick, x80 y280, ahk_exe BetterJPEG.exe,,RIGHT,, Pos	;相对于窗体左上角的相对位置点击
;sendinput,{AppsKey}
sendinput,{down 8}
sleep,50
sendinput,{enter}
sleep,500
ControlClick, x80 y280, ahk_exe BetterJPEG.exe,,RIGHT,, Pos	;相对于窗体左上角的相对位置点击
;~ sendinput,{AppsKey}
sendinput,{down 3}
sleep,50
sendinput,{right}
sleep,50
sendinput,{down 1}	;50%
;~ sendinput,{down 2}	;30%
;~ sendinput,{down 5}	;10%
sendinput,{enter}		;不下移75%，否则按上面
sleep,100
sendinput,{enter}	
Return
10FAFDED-3578-4D7A-8C0B-949FEAEB56B5:
;&9  重命名 修改后缀为ZIP
MySel:=QZData("files")
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	if InStr(FileExist(MyTemFile), "D")
		continue
	SplitPath,MyTemFile,MyOutFileName,MyOutDir,MyOutExt,MyOutNameNoExt,MyOutDrive
	MyNewFile =%MyOutDir%\%MyOutNameNoExt%.zip
	FileMove,%MyTemFile%,%MyNewFile%
}
Return
11A2B2E3-8C53-47A6-BDCD-2E6AECA29B9A:
;TC_排序:左窗口:按第1列排序
QZTC_cm_LeftSortByCol1()
Return
11B015FB-D1C1-4695-834D-F5D07B41A837:
;TC_网络:映射网络驱动器
QZTC_cm_NetConnect()
Return
1200330E-31A6-4604-AE6A-2E1BEAEA18EE:
;TC_自定义列视图:来源窗口:上一个自定义视图
QZTC_cm_SrcPrevCustomView()
Return
12391B5A-1A3D-490F-B286-BEC93B8A4C17:
;Excel_格式-边框-内部水平方向-点线
Excel_Format_SetBonder("内部水平","点线","极细")
Return
12500A7D-9F50-4413-8DEF-2D2C5FF84A7E:
;TC_VIM:重新打开之前关闭的标签页
TC_ReOpenTab()
Return
127A59BF-F448-4DAC-8423-477E9924237D:
;Word_切换到【VIM模式】
vimd.changemode("VIM模式")
MsgBox, 0, 提示, 【VIM模式】, 0.3
Return
128CA60F-E405-4B95-9ADE-2D18B3832E5E:
;TC_文件操作: 新建文件夹
QZTC_cm_MkDir()
Return
12C15E97-C9F6-45F0-8FAD-C3CF17C24B21:
;Excel_工作表-选择第一个工作表
Excel_Worksheet_Select("F")
Return
12CA015B-6389-43EC-AA3D-A08000150BE9:
;Excel_文件-保存Excel文件
Excel_SaveFile()
Return
12D3623D-D220-4530-AFD5-64A12751C580:
;TC_VIM:标注文件-标注
TC_MarkFile()
Return
12DE545B-9654-41D8-AEEE-ABA4905071C2:
;TC_文件操作:显示属性
QZTC_cm_Properties()
Return
131ABECE-8083-4FC7-B384-4FC8B9A9C9A2:
;TC_视图:显示/隐藏:路径导航栏
QZTC_cm_VisBreadCrumbs()
Return
1355C20D-AB79-40FF-8588-91813E45BB69:
;TC_标签:显示标签菜单
QZTC_cm_DirTabsShowMenu()
Return
137B5ED2-859D-4E6E-BBAC-8DF26EA0D560:
;TC_排序:右窗口:按第5列排序
QZTC_cm_RightSortByCol5()
Return
13B843DC-345B-4ACB-A428-0E5E3D8342A4:
;TC_其他:显示快捷菜单
QZTC_cm_ContextMenu()
Return
14AA4FAC-7E58-42B4-988C-6C56FEA56FD3:
;TC_导航:转到上层文件夹
QZTC_cm_GoToParent()
Return
14B004F4-43F9-453E-8CCD-C2DF21379D06:
;TC_选择:选择一组:文件和文件夹
QZTC_cm_SelectBoth()
Return
14B5DBFF-3E13-4BED-8999-AFC0B92B301A:
;TC_标签:来源窗口:激活标签8
QZTC_cm_SrcActivateTab8()
Return
15F024F3-0A06-4107-B112-CCD8C0E7B6B0:
;TC_文件操作: 复制到当前窗口(Shift+F5)
QZTC_cm_CopySamepanel()
Return
15F0BDDC-82E9-42A6-BDA1-7D6E80DCACFA:
;TC_安全:设置权限(NTFS)
QZTC_cm_EditPermissionInfo()
Return
1654BC89-931D-4C31-B54F-CC8B3CB09005:
;&G  智能各自压缩(Shift:加密 Caps:删除)
MyKeyStatus:=
if GetKeyState("Ctrl")
	MyKeyStatus.="Ctrl"
if GetKeyState("Shift")
	MyKeyStatus.="Shift"
if GetKeyState("Alt")
	MyKeyStatus.="Alt"
if GetKeyState("Win")
	MyKeyStatus.="Win"
if GetKeyState("CapsLock", "T")
	MyKeyStatus.="Caps"

if (instr(MyKeyStatus,"Shift")>0)
	InputBox, MyPsw, 提示,`n请输入加密密码`n`n如果为空，则默认不加密`n加密文件名,密码形式为 xxxx`|x ，压缩格式为7z
else
	MyPsw:=

MySel= % QZData("files")
;msgbox % MySel

MyZipFile:=

if (instr(MyKeyStatus,"Caps")>0)
	MyDelete:=1
else
	MyDelete:=0

Zip7=%A_ScriptDir%\Apps\7-Zip\7zg.exe

loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	SplitPath,MyTemFile,,MyOutDir,,MyOutNameNoExt
	MyFileList:=
	MyZipFile:=MyOutDir
	if InStr(FileExist(MyTemFile), "D")
	{
		Loop, %MyTemFile%\* ,1   ;1表示获取文件夹文件夹.
		{
			if A_Index=1
			{
				File=% A_LoopFileFullPath
				continue
			}
			File.= "`r" . "`n" . A_LoopFileFullPath
		}
		MyFileList := RegExReplace(File, "\r\n", """ """) 
	} else {
		MyFileList:=MyTemFile
	}
	;msgbox % MyFileList
		MyZipFile.= "\" MyOutNameNoExt
		MySub_7ZipAddEach(Zip7,MyFileList,MyZipFile,MyPsw,MyDelete)
		if MyDelete
		{
			loop,Parse,MyFileList,`n,`r
			{
				if InStr(FileExist(A_LoopField), "D")
					FileRemoveDir,%A_LoopField%
				else
					FileDelete,%A_LoopField%
			}
		}
}

;~ 压缩过程，Zip7=7Zip路径,MyFileList=要压缩的文件列表,MyZipFile=压缩文件名称，MyPsw=密码,MyDelete=是否删除，1为删除
;~ MySub_7ZipAddEach(Zip7,MyFileList,MyZipFile,MyPsw,MyDelete:=0)
MySub_7ZipAddEach(Zip7,MyFileList,MyZipFile,MyPsw,MyDelete:=0)
{
	if MyPsw!=
	{
		StringSplit,MyArray_PSW,MyPSW,`|
		if MyArray_PSW2!=
		{
			MyZipFile:=MySub_CheckExistEach(MyZipFile,"7z")
			MyCmdLine=%Zip7% a "%MyZipFile%" `-p%MyArray_PSW1% -mhe "%MyFileList%"
		} else {
			MyZipFile:=MySub_CheckExistEach(MyZipFile,"zip")
			MyCmdLine=%Zip7% a "%MyZipFile%" `-p%MyArray_PSW1% "%MyFileList%"
		}
	} else {
		MyZipFile:=MySub_CheckExistEach(MyZipFile,"zip")
		MyCmdLine=%Zip7% a "%MyZipFile%" "%MyFileList%"
	}
	Run,%MyCmdLine%,,UseErrorLevel
	;~ if MyDelete
	;~ {
		;~ loop,Parse,MyFileList,`n,`r
		;~ {
			;~ if InStr(FileExist(A_LoopField), "D")
				;~ FileRemoveDir,%A_LoopField%
			;~ else
				;~ FileDelete,%A_LoopField%
		;~ }
	;~ }
}

MySub_CheckExistEach(FileNameNoExt,ext)
{
	IfExist,%FileNameNoExt%.%ext%   ;已经存在了以“首层文件夹命名”的文件夹，怎么办？
	{
		Loop
		{
			FolderName=%FileNameNoExt%( %A_Index% ).%ext%
			If !FileExist( FolderName )
			{
				return, %FolderName%
				break
			}
		}
		return
	}
	FolderName=%FileNameNoExt%.%ext%
	return, %FolderName%
}
Return
16A2BA1C-C12C-4B30-A610-036137F64F20:
;TC_删除
Postmessage, 1075, 908, 0,, ahk_class TTOTAL_CMD
Return
16BD470C-CBB5-41E2-9787-ABB8FF52CEC2:
;Excel_视图-页面设置对话框
Excel_Dialogs_PageSetup()
Return
16E50B6E-D4B6-47B7-BFD4-0303D06FAA0F:
;TC_VIM:在当前目录里快速过滤exe扩展名的文件
TC_FilterSearchFNsuffix_exe()
Return
1704F56C-C673-4907-B59F-E2A40F98056B:
;TC_剪贴板:复制文件详细信息及完整路径
QZTC_cm_CopyFpFileDetailsToClip()
Return
170DD25C-D341-4A01-A302-6554B3E9A31E:
;TC_FTP:中止当前FTP命令
QZTC_cm_FtpAbort()
Return
1748F3FA-53FB-4E09-B865-C8451FBC6A54:
;TC_FTP:断开FTP连接
QZTC_cm_FtpDisconnect()
Return
18105087-9C89-4988-B782-5D507965B8D0:
;TC_导航:前进(非FTP)
QZTC_cm_GotoNextLocalDir()
Return
182BD32F-17A5-4273-89D5-B903E6AA4603:
;Excel_格式-边框-四周粗实线
Excel_Format_SetBonder("四周","实线","中")
Return
1873ECB9-AF88-4D0C-94C3-E3ECC802A901:
;Word_大纲-4级目录
Word_setParagraphs_Style(4)
Return
18AAAE83-BB21-4A31-884A-3C8786B7A009:
;&R  普通正则式表达式转成Send形式
;给正则式中特殊的字符自动加上花括号，以便可用于Send等指令中，应用于SendRaw不方便的情况。
WinActivate % "ahk_class " QZData("winclass")
WinWaitActive % "ahk_class " QZData("winclass")
Send % TransRegEx(QZData("text"))
return

TransRegEx(RegExText) {
	Loop 2
	{
		RegExText := RegExReplace(RegExText, "{", "{{}")
		RegExText := RegExReplace(RegExText, "(?<=[^{{])\}", "{}}")
		Arr=^,!,+,#
		Loop, Parse, Arr, `,
			RegExText := RegExReplace(RegExText, "((?<=[^{])\" A_loopfield "(?=[^}]))|^\" A_loopfield "|\" A_loopfield "$", "{" A_loopfield "}")
	}
	return RegExText
}
Return
18C10765-E673-4D54-9C19-081AC050AA37:
;Word_图片-衬于文字下方(31)
Word_setShape_WrapFormat(31)
Return
18FCCDBA-811C-41C8-B9B2-A09A7FDC4AC0:
;Excel_格式-设置/取消下划线
Excel_Format_SetUnderline()
Return
1928D9A5-6BE4-4558-BC14-3A25F2161F43:
;TC_剪贴板:复制文件详细信息
QZTC_cm_CopyFileDetailsToClip()
Return
192B5200-5DE4-411F-89B7-31980DE6EACA:
;TC_帮助:关于TotalCommander
QZTC_cm_About()
Return
19AFA47B-0450-4837-8CA4-B58F9213B5A7:
;TC_标签:目标窗口:激活标签10
;QZTC_cm_TrgActivateTab10()
Return
1A24F452-D0ED-42A2-98A7-FA103C20A26D:
;Word_插入-图片
Word_Dialogs_Insert_Picture()
Return
1AA9D254-38BA-40DC-AF03-959202406B08:
;TC_标签:目标窗口:激活标签6
QZTC_cm_TrgActivateTab6()
Return
1AC0AA29-21D3-4693-AF56-DAD0D3620247:
;TC_选择:导出选择列表(ANSI)
QZTC_cm_SaveSelectionToFileA()
Return
1AC38904-338C-49B3-A8F6-AEAC20969A54:
;Phantom_页面管理-旋转-全部-逆90
;sendinput,!o
;sendinput,t
WinMenuSelectItem, A, , 页面管理, 旋转页面
controlclick,combobox1,,旋转页面,,
sendinput,{tab}
sendinput,{up}
sendinput,{up}
sendinput,{up}
sendinput,{enter}
Return
1AC7CC7B-2EAA-43F6-955B-CA76CCE7E90B:
;QQ浏览器_新建标签
sendinput,^t
Return
1B9879C0-C671-4ECB-A39B-C17DAA206655:
;Excel_右键临时命令
;--------------------------------------
;作用：重复命令【F4】后，选中G1
sendinput,{F4}
sleep,100
global excel
Excel_Get()
excel.Cells(1,7).select


Return
1C4052A8-074D-4A9B-8D4B-4A9EE61159FB:
;TC_来源窗口:反向排序
QZTC_cm_SrcNegOrder()
Return
1CE89849-089E-40DB-8AF3-47D29B4E7934:
;TC_其他:标出新文件,隐藏相同者
QZTC_cm_DirMatch()
Return
1DC15F54-5E00-41FA-9DD6-480456F1D2DB:
;通用_PageDown
Send {PgDn}
Return
1DE17ED0-BFB7-431C-9D8F-B98588EB6D25:
;&Z  打开当前目录(资源管理器)
CurWinClass:=QZData("winclass") ;将获取的class名赋值给用户变量
if (CurWinClass="TTOTAL_CMD") ;如果当前激活窗口为TC
{
	IfWinNotActive ahk_class TTOTAL_CMD
	{
		Postmessage, 1075, 2015, 0,, ahk_class TTOTAL_CMD	;最大化
		WinWait,ahk_class TTOTAL_CMD
		WinActivate
	}
	Postmessage, 1075, 332, 0,, ahk_class TTOTAL_CMD	;光标定位到焦点地址栏
	sleep 300
	PostMessage,1075,2029,0,,ahk_class TTOTAL_CMD ;获取路径
	sleep 100
	DirectionDir:=Clipboard
}
If(DirectionDir="ERROR")		;错误则退出
	return
;在资源管理器中打开
run, %DirectionDir%
return

Return
1DE325F4-6B1F-4213-B11F-79F93B2E0910:
;Excel_格式-边框-内部水平方向-实线
Excel_Format_SetBonder("内部水平","实线","细")
Return
1DEE23E4-6650-4C09-B58A-B973D546707E:
;TC_其他:交换左右窗口
QZTC_cm_Exchange()
Return
1E8B455A-D4C3-4A48-9CAD-5BFF83176DDC:
;Excel_单元格-填充-以左侧单元格值
Excel_Range_FillWith("左")
Return
1E9AB890-6978-498B-858B-0B76A5713BA7:
;TC_右窗口:按大小排序
QZTC_cm_RightBySiz()
Return
1EE25B02-3629-4B9D-802A-03E5428FCF25:
;Excel_行-删除行-从当前行到顶部
Excel_Row_DeleteFromCurrentToFirst()
Return
1F1B4080-2337-489F-82BF-EF0E979962E8:
;左键事件监控 (&L)
Run "%A_AhkPath%"  "\QuickZ\Apps\AutoHotkey\左键事件监控.ahk"
Return
1F23A818-A5C8-477A-BC5A-ABC3ED7E3E51:
;&T  窗口置顶/取消置顶
iHwnd=
iHwnd := gMenuZ.Data.hwnd
if iHwnd=
	WinGet, iHwnd, ID, A
wTitle=
WinGetTitle, wTitle, ahk_id %iHwnd%
X=
Y=
Width=
Height=
WinSet, AlwaysOnTop, Toggle, ahk_id %iHwnd%
WinGetPos, X, Y, Width, Height, ahk_id %iHwnd%
Y:=Y+5
WinGet, ExStyle, ExStyle, ahk_id %iHwnd%
if (ExStyle & 0x8)  ; 0x8 为 WS_EX_TOPMOST.
;  ... 窗口处于置顶状态, 执行适当的动作.
{
	WinSetTitle, ahk_id %iHwnd%, , %wTitle%_已置顶
	SplashImage Off
	SplashImage, % "",X%X% Y%Y% W100 B fs10 CTFFFFFF CW000000,% "窗口已置顶", , 切换模式提示
	WinSet, Transparent, 180, ahk_class AutoHotkey2
	sleep 1300
	SplashImage Off
}
else
{
	wTitle:=RegExReplace(wTitle, "_已置顶")
	WinSetTitle, ahk_id %iHwnd%, , %wTitle%
	SplashImage Off
	SplashImage, % "",X%X% Y%Y% W100 B fs10 CTFFFFFF CW000000,% "取消置顶", , 切换模式提示
	WinSet, Transparent, 180, ahk_class AutoHotkey2
	sleep 1300
	SplashImage Off
}
return
Return
1FB69A68-BD92-48E3-A60F-534EA1D75A1C:
;Excel_筛选-显示内容列表
Excel_Filter_ShowList()
Return
1FFF22C9-71EE-4FB5-80A7-85E498A799C8:
;TC_FTP:新建FTP连接
QZTC_cm_FtpNew()
Return
200EA2E8-4120-4E4A-B99C-967987E81A8A:
;TC_选择:不选一组文件
QZTC_cm_ShrinkSelection()
Return
203D169E-EC7B-4670-8998-90ADA371CA16:
;TC_剪贴板:复制目标路径
QZTC_cm_CopyTrgPathToClip()
Return
20CBF2D4-ED8E-492D-9300-1798EE37F5B3:
;Excel_行-选中行
Excel_Row_Select()
Return
20E17306-830B-4DBE-8D6D-38B1F897861F:
;TC_自定义列视图:左窗口:自定义列视图4
QZTC_cm_LeftCustomView4()
Return
2113837B-459B-4663-AFF2-D16829CCB852:
;TC_自定义列视图:来源窗口:下一个自定义视图
QZTC_cm_SrcNextCustomView()
Return
2131FED8-AE46-4185-8257-8A5931280F8E:
;TC_重命名
Postmessage, 1075, 1002, 0,, ahk_class TTOTAL_CMD
Return
21A3CBEE-B63D-4B86-813D-3C939B78186B:
;Phantom_切换到【VIM模式】
send,{esc}
vimd.changemode("VIM模式")
MsgBox, 0, 提示, 【VIM模式】, 0.3
Return
222453AC-BDC1-4B0A-A477-80509ED1B787:
;TC_视图:切换:平坦/立体驱动器按钮
QZTC_cm_VisFlatDriveButtons()
Return
222B1EA1-B74E-48E0-B0DD-0307AEA06244:
;Excel_列-自动列宽
Excel_Column_AutoWidth()
Return
232D2436-2041-4D62-AC35-DCCA576586D2:
;TC_自定义列视图:右窗口:下一个自定义视图
QZTC_cm_RightNextCustomView()
Return
23EFDFAE-39E7-4A12-AF9E-BE381DCEF208:
;TC_配置:快速搜索
QZTC_cm_QuickSearchConfig()
Return
23F20DA8-4C90-4246-A462-0D18174FE19C:
;Phantom_页面管理-旋转-全部-顺90
;sendinput,!o
;sendinput,t
WinMenuSelectItem, A, , 页面管理, 旋转页面
controlclick,combobox1,,旋转页面,,
sendinput,{down}
sendinput,{tab}
sendinput,{up}
sendinput,{up}
sendinput,{up}
sendinput,{enter}
Return
258ED914-40B8-4B76-BA9F-7562C3F290B1:
;Excel_行-行高增大
Excel_Row_SetHeight("+1")
Return
2598B98E-D19F-406C-91E0-DCAFF1BD6F15:
;Word_大纲-8级目录
Word_setParagraphs_Style(8)
Return
25BEB662-832E-4F89-B846-6BA3928D4A4D:
;TC_VIM:还原当前窗口显示状态50%-100%
TC_Toggle_50_100Percent()
Return
25D88DEF-612B-4BE0-AA82-05F989C45B77:
;TC_右窗口:关闭快速查看窗口
QZTC_cm_RightHideQuickvie()
Return
26038538-1749-4D72-8499-A10CAB1EE95F:
;Phantom_页面管理-删除从到
;send !o
;send d
WinMenuSelectItem, A, , 页面管理, 删除页面

Return
26115AB7-7F05-4942-A8AC-4E9F744CD010:
;TC_导航:网上邻居
QZTC_cm_OpenNetwork()
Return
270C00C3-E169-472C-A4FA-8FD3936EAC6B:
;TC_视图:仅显示选中的文件
QZTC_cm_ShowOnlySelected()
Return
276FC939-6B05-4B93-A1D6-9ED9EFEEEFAF:
;TC_VIM:粘贴文件，如果光标下为目录则粘贴进该目录
TC_PasteFileEx()
Return
2782FB15-F241-4ABB-A1B9-E4FDC486A37E:
;通用_另存为（Ctrl+Shift+S）
sendinput,^+s
Return
2790931C-EFD7-4F70-959D-387609FAEAD8:
;Word_字号-缩小
Word_setFontShrink()
Return
27B6251C-0D8D-4A82-8321-F9FF6224A402:
;TC_视图:显示/隐藏:驱动器列表
QZTC_cm_VisDriveCombo()
Return
27EA36B2-0B28-4B5E-ADCD-79A6279A8C6D:
;TC_选择:反向选择:文件和文件夹
QZTC_cm_ExchangeSelBoth()
Return
28239F58-7163-4CC0-8100-D0ED250EFFEF:
;TC_网络:显示系统共享文件夹
QZTC_cm_AdministerServer()
Return
28AC147A-E20B-4D33-A74C-3C6C854D8545:
;Excel_数据处理-设置打印区域
Excel_Data_SetPrintArea()
Return
2925BE1A-E343-4550-B624-2F6843FA0F7E:
;Excel_行-自动行高
Excel_Row_AutoHeight()
Return
29334CD8-7FE5-4EA2-924A-54A3F9B42185:
;TC_视图:只展开选中的文件夹
QZTC_cm_DirBranchSel()
Return
298802B0-54FE-45F3-A3BC-2D4DA0984C75:
;TC_VIM:不打开目录，直接把复制的文件贴进去
TC_OpenDirAndPaste()
Return
29BA459F-CD73-460C-8A30-C64EE2CF8E03:
;TC_用户:用户菜单6
QZTC_cm_UserMenu6()
Return
29CF462A-6517-49B9-B02F-D356F7093B70:
;Excel_筛选-数值小于等于（<=）的单元格
Excel_Filter_EqualOrLesser()
Return
2A728EF4-0229-4F93-B9D7-31EBA73ECE2C:
;海迈_导出到Excel
^e::
IfWinNotActive,ahk_class TfrmMain
	return
;DPI获取
CurDPI:=A_ScreenDPI
MyScale:=CurDPI/96
;打印窗口
WinWaitActive, ahk_class TfrmMain, , 5
CurX:=175*MyScale
CurY:=85*MyScale
ControlClick, x%CurX% y%CurY%, ahk_class TfrmMain,,,, Pos
;打印预览窗口
WinWaitActive, ahk_class TfrmRMPreview, , 5
CurX:=190*MyScale
CurY:=55*MyScale
ControlClick, x%CurX% y%CurY%, ahk_class TfrmRMPreview,,,, Pos
;导出窗口
;1-下一步
WinWaitActive, ahk_class TfrmExportRpt, , 5
CurX:=335*MyScale
CurY:=415*MyScale
ControlClick, x%CurX% y%CurY%, ahk_class TfrmExportRpt,,,, Pos
sleep,800
;2-导出的有图表
ControlClick, TGroupButton1, ahk_class TfrmExportRpt
sleep,300
;3-浏览导出文件夹
CurX:=465*MyScale
CurY:=215*MyScale
ControlClick, x%CurX% y%CurY%, ahk_class TfrmExportRpt,,,, Pos
sleep,300
WinWaitActive, ahk_class #32770, , 5
sendinput,^g
sleep,500
ControlClick, Button1, ahk_class #32770
sleep,300
CurX:=335*MyScale
CurY:=415*MyScale
ControlClick, x%CurX% y%CurY%, ahk_class TfrmExportRpt,,,, Pos
sendinput,!{F4}

Return
2AE9559A-F470-4108-B252-5DAFE755A040:
;TC_VIM:移动第一行
TC_FirstLine()
Return
2B13DC3A-9FC3-4726-BE74-CA17A977DBAE:
;Word_退出Word
Word_CloseWord()
Return
2B14C1D1-36DD-4489-94C1-CA60235E0AD8:
;Spy++ (&S)
Run "%A_AhkPath%" "\QuickZ\Apps\AutoHotkey\Ahkspy++.ahk"
Return
2B8452CA-A525-4DD4-9F0F-D726635078CA:
;Excel_格式-指定颜色xxxxxxxx
Excel_Format_SetColor()
Return
2C0F563D-BBEB-45F2-A9CC-42B678C082C7:
;&G  LICECap直接开始录制GIF
run apps\LICECap\licecap.exe
sleep 100
send {Space}
sleep 500
clipboard = LiceCap屏幕录制_%A_now% ;增加上面这句，把当前的系统日期发送到剪贴板
Send, ^v{Enter} ;发送 Ctrl + v 和回车
return
Return
2C345DA6-D9F1-4B12-8720-8F72A7B43F3B:
;Excel_单元格-编辑-在头部输入
Excel_Range_Edit("F")
Return
2C584D47-FC21-45FA-8CB5-5506218B9DBC:
;Excel_格式-边框-内部垂直方向-点线
Excel_Format_SetBonder("内部垂直","点线","极细")
Return
2C7EF47E-E1EB-4115-B712-765377531492:
;TC_排序:左窗口:按第2列排序
QZTC_cm_LeftSortByCol2()
Return
2D12734F-75F2-4C65-ACFD-39BE51DC34D3:
;Excel_页面设置-纸张横向
Excel_PageSetup_SetOrientation("横向")
Return
2D5B941C-9574-4419-A493-AA70446BCDF6:
;TC_标签:来源窗口:激活标签9
QZTC_cm_SrcActivateTab9()
Return
2D8665F5-0C4F-462B-A92D-2A3970AFC0C1:
;TC_选择:导出详细信息
QZTC_cm_SaveDetailsToFile()
Return
2DBEF12D-9B54-4DD4-BE42-0B9C4699A371:
;TC_来源窗口:按文件名排序
QZTC_cm_SrcByName()
Return
2E1A1729-0DFB-4023-90B7-4EE7D13CB1C2:
;Phantom_页面管理-旋转-从到-180
;sendinput,!o
;sendinput,t
WinMenuSelectItem, A, , 页面管理, 旋转页面
controlclick,combobox1,,旋转页面,,
sendinput,{down}
sendinput,{down}
;sendinput,{enter}
Return
2E355C3B-FA43-4B59-AE85-C349AB5315C7:
;Excel_筛选-不包含
Excel_Filter_NotInclude()
Return
2E40DC46-11FE-427C-9392-21E4A33E1079:
;Word_设置/取消下划线
Word_setUnderline()
Return
2EAE76D6-8A2B-4B7F-8E55-BA7997E690D0:
;TC_文件操作:新建文件夹
QZTC_cm_MkDir()
Return
2F2699C1-C7BA-463C-B658-C8AD97795AA6:
;Excel_格式-设置/取消斜体
Excel_Format_SetItalic()
Return
2F5C5241-18C3-4F69-B365-0D7C88B043B9:
;Phantom_关闭当前标签
sendinput,^w
Return
2F8E5F3D-4F30-4247-9E53-859BCC9F9A51:
;Excel_筛选-开头是
Excel_Filter_BeginWith()
Return
2F959A47-4D4B-4F42-9B19-28F21EBD5542:
;Word_段落行距-5倍
Word_setLineSpacing(5)
Return
2FA3FEC6-8CF9-4BEE-9088-AF8A121CFBCB:
;&J  智能解压
 GetFiles:=QZData("{file:path}")
 RunCmd=%A_ScriptDir%\Apps\Kawvin系列软件\Kawvin智能解压\Kawvin智能解压.exe "%GetFiles%" 
runwait,%RunCmd%
Return
30200A71-C4B8-4F9E-9A63-B325B1F060D8:
;Excel_筛选-包含
Excel_Filter_Include()
Return
30682C4F-F6E9-456C-87B1-1A9234B1EB2D:
;TC_其他:计算所有文件夹占用的空间
QZTC_cm_CountDirContent()
Return
30E088E1-7955-4894-B358-61D645E3B8A5:
;Word_插入-日期（20171231）
Word_Insert_Date("d")
Return
3100E2AD-81B3-44F0-B26C-A45122AD9A46:
;Excel_页面设置-以当前单元格的值设置页脚右侧
Excel_PageSetup_SetFooter("R","")
Return
319952AA-8367-44A9-A4CB-4CEA55F1AB4B:
;TC_VIM:文件操作-删除指定类文件
TC_DeleteByExt("torrent;txt;html;url")
Return
31D01E1A-771D-4BC2-B43C-D0F7FDDD48DB:
;TC_工具:后台传输管理器
QZTC_cm_OpenTransferManager()
Return
31FABCF9-A3BC-4C7F-B717-DAE8DF6E695E:
;TC_打印:打印文件列表
QZTC_cm_PrintDir()
Return
320F1456-E070-4948-96B0-2049D9149416:
;Word_图片-紧密环绕型(1)
Word_setShape_WrapFormat(1)
Return
32294C04-9AC6-4FE4-9692-E02F31B23435:
;TC_其他:编辑文件备注
QZTC_cm_EditComment()
Return
324C6186-ACA7-4D6C-A7DB-BA9EE4AC5C1D:
;TC_来源窗口:快速查看(不用插件)
QZTC_cm_SrcQuickInternalOnly()
Return
32516D11-D8D7-421D-ADAC-6F1A01212D85:
;TC_选择:恢复选择列表
QZTC_cm_RestoreSelection()
Return
32BAEDC8-EA09-4271-BAD0-823FE3CF2A2D:
;Word_字体-Times New Roman
Word_setFontName("Times New Roman")
Return
32CE6AF7-50CB-457B-972E-949E6AAE40E5:
;TC_右窗口:文件夹树
QZTC_cm_RightTree()
Return
3300A499-2755-425A-98D9-C65555150BAE:
;TC_VIM:切换到最后一个标签
TC_GoLastTab()
Return
3322C620-5322-49F6-BC67-627BDD3DCE42:
;Word_字体颜色-小写
;word:=word_get()
;selection:=word.selection
;selection.font.Color := wdColorRed
Return
33267AA5-B30D-4B94-B6B0-345A3EAB0644:
;Excel_筛选-降序排列
Excel_Filter_Sort(1)
Return
335FA79F-A454-4787-A79C-E03BCEB62577:
;TC_排序:来源窗口:按第6列排序
QZTC_cm_SrcSortByCol6()
Return
33BD02A5-00F9-4C2D-931A-545056BC3191:
;TC_导航:打印机
QZTC_cm_OpenPrinters()
Return
33C74D13-6EEE-4441-8AC2-FAF40C819FB2:
;&S  所选文本转到 SciTE4 中编辑
AppPath:=QZData("%scite%")
clipboard:=QZData("{Text}" )
ifnotexist,%AppPath%
	return
IfWinNotExist	ahk_class SciTEWindow	;如果SciTE4没有打开
{
	Run,%AppPath%,,Max
	WinWait,ahk_class SciTEWindow,,5
	if ErrorLevel		;如果5秒没激活，则退出
		return
	WinActivate
	sendinput,^v
}
IfWinNotActive ahk_class SciTEWindow
{
	Run,%AppPath%,,Max
	WinWait,ahk_class SciTEWindow,,5
	if ErrorLevel			;如果5秒没激活，则退出
		return
	WinActivate
	sendinput,^n
	sleep,300
	sendinput,^v
}
clipboard:=
Return
33ECDAED-BC27-4790-90B1-2FE0DACE8F16:
;TC_文件操作:解码文件(MIME/UUE/XXE/BinHex格式)
QZTC_cm_Decode()
Return
33F55287-5F5E-474A-8663-5A4DC5FF3516:
;TC_文件操作:解压文件
QZTC_cm_UnpackFiles()
Return
3439FB7C-7545-4E16-8D20-D9C107BC727A:
;TC_来源窗口:可执行文件
QZTC_cm_SrcExecs()
Return
348122D2-CDD1-4D0C-9C98-CF8A1183FB2E:
;TC_左窗口:详细信息
QZTC_cm_LeftLong()
Return
34827D4E-0613-455A-8DE9-53A536578524:
;TC_用户:用户菜单7
QZTC_cm_UserMenu7()
Return
348BB786-CA6B-4D45-BC4A-4BC89633D79C:
;Excel_筛选-不相同的单元格
Excel_Filter_NotEqual()
Return
34D2CE1C-3917-4A0D-AD77-C30FB231A7C8:
;Excel_格式-字号变小
Excel_Format_SetFontSize("-1")
Return
34DBD1D6-162B-4819-8D68-F78DBD6F5789:
;TC_排序:目标窗口:按第2列排序
QZTC_cm_TrgSortByCol2()
Return
3506C66E-E5A2-4180-8186-F273B9F4DDA0:
;Excel_定位-到当前区域边缘-下
Excel_Location_EdgeCell("下")
Return
353BA3CE-E9D2-4901-B8FE-BE000FC3BE23:
;TC_标签:左窗口:激活标签10
;QZTC_cm_LeftActivateTab10()
Return
3543A7C6-E1AD-4EF3-816F-DE8339F3BEB4:
;TC_VIM: 打开/激活TC
TC_ToggleTC()
Return
358C0382-7C25-4F39-B975-04A9D4E3900A:
;Excel_格式-边框-全部细实线
Excel_Format_SetBonder("全部","实线","细")
Return
3593D660-F061-46A2-97DF-7CD53A1AB1BC:
;Excel_筛选-升序排列
Excel_Filter_Sort(0)
Return
35AB316B-C214-44DA-9918-6B98F2B7BE23:
;&D  转到 Notepad++ 中编辑
Editor= ;执行前清空变量
Editor:=QZData("%NotepadJJ%") ;在本行指定要使用的编辑器变量
;===========
;以下内容无需改动
;===========
dPath=
dPath:=getDocumentPath()
WinActivate % "ahk_class" QZData("winclass")
WinWaitActive % "ahk_class" QZData("winclass")
dTitle=
WinGetTitle, dTitle,  A
;~ ;===========
;~ ;通过Pipe运行代码
;~ ;===========
ScriptContent:=% "SetTitleMatchMode, 3`nGroupAdd, GroupName, " dTitle "`nWinClose, ahk_group GroupName`nWinWaitClose, ahk_group GroupName`nRun, """ Editor """ """ dPath """`nreturn"
CustomFunc_PipeRun(ScriptContent)
Return
Return
35EBA71C-0E75-46CE-8043-FA747E0F3D20:
;Excel_筛选-与所选单元格前1-8个字符相同
Excel_Filter_EqualAsFront(8)
Return
360F6649-71E3-42DE-8B2F-175741C3BD0D:
;TC_排序:目标窗口:按第9列排序
QZTC_cm_TrgSortByCol9()
Return
361E0B5E-6EC8-4BA2-9ED4-07D250F683B8:
;TC_工具:批量重命名
QZTC_cm_MultiRenameFiles()
Return
36451964-148F-4B9D-9A96-4791C7AB91FA:
;TC_选择:全部选择:文件和/或文件夹(视配置而定
QZTC_cm_SelectAll()
Return
3649D658-7B54-468B-9031-8DED0FA8A5A2:
;TC_导航:转到驱动器E
QZTC_cm_GotoDriveE()
Return
371859D4-F66E-4284-816B-3855E17CE9F6:
;Excel_文件-另存Excel文件
Excel_SaveFileAs()
Return
391E5B0F-A083-4CAE-A967-0B91A9040FCB:
;TC_左窗口:上次选中的文件
QZTC_cm_LeftUserSpec()
Return
3920F116-D686-42ED-B207-A44D0DF1E297:
;TC_工具:浏览内部命令
QZTC_cm_CommandBrowser()
Return
392BD217-5A89-41D7-B15A-014EA4166599:
;TC_全选
Postmessage, 1075, 3301, 0,, ahk_class TTOTAL_CMD
Return
3930A133-3582-43EA-B1E6-4F5EEFBAF94B:
;TC_导航:我的电脑
QZTC_cm_OpenDrives()
Return
3982FA8C-4C19-44F0-A0A2-A6E586507678:
;TC_来源窗口:缩略图
QZTC_cm_SrcThumbs()
Return
39A4361B-3D4B-401E-B7F7-F8D45E24CF5C:
;Word_大纲-2级目录
Word_setParagraphs_Style(2)
Return
39C47644-1EC3-4BA7-BD25-14347C081D1E:
;TC_FTP:选择传输模式
QZTC_cm_FtpSelectTransferMode()
Return
39D04B3F-B6A6-4D56-B106-02EEFBDE635B:
;TC_标签:右窗口:激活标签4
QZTC_cm_RightActivateTab4()
Return
39D0F494-3513-46D5-86CA-E461E72DC37C:
;TC_文件操作:分割文件
QZTC_cm_Split()
Return
39E1241F-422A-488B-8AA1-FCA331919CBE:
;Excel_页面设置-以当前单元格的值设置页脚左侧
Excel_PageSetup_SetFooter("L","")
Return
39FFA942-BFA9-476C-A53D-AC46A65E53E0:
;TC_导航:转到驱动器A
QZTC_cm_GotoDriveA()
Return
3A45BF88-F3D0-4283-B6F2-18F1B142EDD5:
;&T  重命名 替换文件名中指定内容(Shift:编辑 Ctrl:临时)
ReplaceList=%A_ScriptDir%\User\替换列表.txt
IfNotExist,%ReplaceList%
	return

MyKeyStatus:=
if GetKeyState("Ctrl")
	MyKeyStatus.="Ctrl"
if GetKeyState("Shift")
	MyKeyStatus.="Shift"
if GetKeyState("Alt")
	MyKeyStatus.="Alt"
if GetKeyState("Win")
	MyKeyStatus.="Win"
if GetKeyState("CapsLock", "T")
	MyKeyStatus.="Caps"
;~ msgbox , % MyKeyStatus

if (instr(MyKeyStatus,"Shift")>0) ;按下Shift选择菜单，则编辑替换列表
{
	Run,%ReplaceList%
	return
}
MyArray_List:={}
if (instr(MyKeyStatus,"Ctrl")>0)   ;按下Ctrl选择菜单，则临时替换
{
	InputBox, MyInput, `n提示,请输入替换及替换内容，格式：xxx`=yyy`n`n如果格式为 xxx`=yyy`|x，则添加到替换列表，x可以为任意字符
	StringSplit,MyArray_List,MyInput,`|
	if MyArray_List2!=   ;如果格式为 xxx`=yyy`|x，则添加到替换列表
		FileAppend,`n%MyArray_List1%`n,%ReplaceList%
}
MySel:=QZData("files")
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	SplitPath,MyTemFile,,MyOutDir,MyOutExt,MyOutNameNoExt
	MyNewFile=%MyOutDir%\%MyOutNameNoExt%
	;If InStr(FileExist(MyTemFile), "D")
	;    continue
	if MyArray_List1!=   ;如果是临时替换
	{
		MyOldStr:=RegExReplace(MyArray_List1,"=.*?$")  	 ;要替换的字符串
		MyNewStr:=RegExReplace(MyArray_List1,"^.*?=") 	;替换为的字符串
		StringReplace,MyNewFile,MyNewFile,%MyOldStr%,%MyNewStr%,all
	} else {
		loop,Read,%ReplaceList%,`n
		{
			if Trim(A_LoopReadLine)=""
				continue
			MyOldStr:=RegExReplace(A_LoopReadLine,"=.*?$")  	 ;要替换的字符串
			MyNewStr:=RegExReplace(A_LoopReadLine,"^.*?=") 	;替换为的字符串
			StringReplace,MyNewFile,MyNewFile,%MyOldStr%,%MyNewStr%,all
		}
	}
	if MyTemFile=%MyNewFile%.%MyOutExt%
		continue
	MyNewFileCount=%MyNewFile%.%MyOutExt%
	if MyNewFileCount=
		return
	loop
	{
		IfNotExist,%MyNewFileCount%
			break
		MyNewFileCount=%MyNewFile%-%A_Index%.%MyOutExt%
	}
	if InStr(FileExist(MyTemFile), "D")
		FileMoveDir,%MyTemFile%,%MyNewFileCount%
	else
		FileMove,%MyTemFile%,%MyNewFileCount%
}
Return
3A941408-39D4-4EE8-800C-FB39A21491B0:
;&P  复制完整路径
clipboard := QZData("Files")
Return
3AC67716-35B0-443A-AE77-C8E735303EBF:
;&Z 在资源管理器打开
ExplorerPath := QZData("text")
run, %ExplorerPath%
return
Return
3ACB5C81-286C-4754-94D4-2E48B0C31156:
;TC_导航:编辑来源窗口的路径
QZTC_cm_EditPath()
Return
3AE0E1EF-EB2D-488F-900E-689772B902ED:
;TC_VIM: 显示标记
TC_ListMark()
Return
3AE747C4-7339-482D-91CA-C32F32C6E614:
;TC_视图:显示/隐藏:两个驱动器按钮栏
QZTC_cm_VisTwoDriveButtons()
Return
3B932E87-A107-4A73-9C29-CCD3CCDB2979:
;Excel_格式-边框-全部无边框
Excel_Format_SetBonder("全部","无","细")
Return
3BDCA158-B639-41A6-AC2D-94DB1BC5DEDF:
;TC_其他:比较文件夹(同时标出另一窗口没有的子文件夹)
QZTC_cm_CompareDirsWithSubdirs()
Return
3BF3244A-36FF-4961-BDAE-A397B4A05774:
;&Q  和此QQ好友聊天
clipboard := QZData("text")
;If ! (RegExMatch(Clipboard,"^[0-9]{5,11}$"))  ;限定qq的位数为5--11位
;return
;else
run,tencent://message/?uin=%clipboard%&fuin=105224583
;uin是要发起的对象，fuin是谁要发起,如果电脑登录了一个以上的qq的话加上fuin可以控制你要发起的那个qq号，如果电脑只登陆了一个qq，fuin参数可以去掉
return
Return
3C30B603-A103-4504-93E3-90293796E93A:
;TC_标签:目标窗口:激活标签2
QZTC_cm_TrgActivateTab2()
Return
3C43F296-A6EF-461C-A195-AE66B3957D9A:
;Excel_工作表-移动到右侧
Excel_Worksheet_MoveRight()
Return
3C7AABDB-27AA-4E98-A126-ACBA25FB78CD:
;TC_自定义列视图:左窗口:自定义列视图9
QZTC_cm_LeftCustomView9()
Return
3CA46094-544C-48E7-8DA6-C913897199D6:
;Word_大纲-正文
Word_setParagraphs_Style(0)
Return
3CC2BA0E-969C-4021-9165-9688E6716BD8:
;Excel_筛选-与所选单元格后1个字符相同
Excel_Filter_EqualAsBehind(1)
Return
3CC71DE3-1F1C-4E88-BDF6-680EA3DDF678:
;Excel_筛选-相同的单元格
Excel_Filter_Same()
Return
3D0DC26F-59EA-46C7-A37A-EDCFA3E70B9F:
;TC_标签:左窗口:激活标签3
QZTC_cm_LeftActivateTab3()
Return
3D4490A9-CD1E-4B70-8402-A131D4D51DB8:
;TC_打印:打印文件内容
QZTC_cm_PrintFile()
Return
3D4F2CCE-CD25-4A35-89CB-C88B7A876386:
;TC_视图:显示/隐藏:文件夹标签
QZTC_cm_VisDirTabs()
Return
3D848D14-BC91-4858-A9CE-12AD9F66E749:
;Word_设置字体底色颜色
Word_setColor()
Return
3DF7DE67-EFBB-4DDE-8BC1-CAAB4B382B4A:
;TC_右窗口:反向排序
QZTC_cm_RightNegOrde()
Return
3E50D285-154B-4BBC-BF41-FD786A510367:
;Word_左对齐
Word_setAlignment("L")
Return
3ED0C821-7A7B-40FB-988E-09E5B6D8D6C9:
;Excel_单元格-删除单元格-下方单元格上移
Excel_Selection_Delete("上移")
Return
3F21D180-6D04-4F07-B3EF-7EB8788439F9:
;TC_视图:显示快速搜索窗口
QZTC_cm_ShowQuickSearch()
Return
3F47EE90-9136-422F-B310-15EAD7918B22:
;TC_其他:两边窗口同步更改文件夹
QZTC_cm_SyncChangeDir()
Return
3F6CCF14-6C90-41AA-B806-9BC553E92373:
;TC_左窗口:打开驱动器列表
QZTC_cm_LeftOpenDrives()
Return
3FA8838E-972A-4A53-B08A-529C8D30272E:
;Phantom_页面管理-旋转-当前页-180
;sendinput,!o
;sendinput,t
WinMenuSelectItem, A, , 页面管理, 旋转页面
controlclick,combobox1,,旋转页面,,
sendinput,{down}
sendinput,{down}
sendinput,{enter}
controlclick,Button7,,旋转页面,,
Return
3FC7C79F-7D5E-4657-B3BE-8472E23C7916:
;TC_选择:选择扩展名相同的文件
QZTC_cm_SelectCurrentExtension()
Return
4058D0F0-8D63-4AE0-BCE1-377B2736FED5:
;&T  打开当前目录(TotalCMD)
;获取当前目录
CurWinClass:=QZData("winclass") ;将获取的class名赋值给用户变量
Curhwnd:=QZData("hWnd")
if (CurWinClass="ExploreWClass") or (CurWinClass="CabinetWClass") ;如果当前激活窗口为资源管理器
{
	DirectionDir:=Explorer_GetPath_Kawvin1(Curhwnd)
	IfInString,DirectionDir,`;		;我的电脑、回收站、控制面板等退出
		return
}
if (CurWinClass="WorkerW") or (CurWinClass="Progman") ;如果当前激活窗口为桌面
{
	;DirectionDir=%A_Desktop%
	DirectionDir:=Explorer_GetPath_Kawvin1(Curhwnd)
}
if (CurWinClass="Shell_TrayWnd") ;如果当前激活窗口为任务栏
	return
If(DirectionDir="ERROR")		;错误则退出
	return
;在TC中打开
TLAppPath:=QZData("%TOTALCMD%")
ifnotexist,%TLAppPath%
	return
IfWinNotExist	ahk_class TTOTAL_CMD
	Run,%TLAppPath%,,Max
IfWinNotActive ahk_class TTOTAL_CMD
{
	Postmessage, 1075, 2015, 0,, ahk_class TTOTAL_CMD	;最大化
	WinWait,ahk_class TTOTAL_CMD
	WinActivate
}
PostMessage 1075, 3001, 0, , AHK_CLASS TTOTAL_CMD
ControlSetText, Edit1, cd %DirectionDir%, ahk_class TTOTAL_CMD
Sleep,400
ControlSend, Edit1, {Enter}, ahk_class TTOTAL_CMD
return

Explorer_GetPath_Kawvin1(hwnd="")
{
	if !(window := Explorer_GetWindow_Kawvin1(hwnd))
		return ErrorLevel := "ERROR"
	if (window="desktop")
		return A_Desktop
	path := window.LocationURL
	path := RegExReplace(path, "ftp://.*@","ftp://")
	StringReplace, path, path, file:///
	StringReplace, path, path, /, \, All
	loop
		if RegExMatch(path, "i)(?<=%)[\da-f]{1,2}", hex)
			StringReplace, path, path, `%%hex%, % Chr("0x" . hex), All
		else break
	return path
}

Explorer_GetWindow_Kawvin1(hwnd="")
{
	WinGet, Process, ProcessName, % "ahk_id" hwnd := hwnd? hwnd:WinExist("A")
	WinGetClass class, ahk_id %hwnd%

	if (Process!="explorer.exe")
		return
	if (class ~= "(Cabinet|Explore)WClass")
	{
		for window in ComObjCreate("Shell.Application").Windows
			if (window.hwnd==hwnd)
				return window
	}
	else if (class ~= "Progman|WorkerW")
		return "desktop" ; desktop found
}
Return
407DDC27-7A2C-4418-9DDC-BCC456D93CFC:
;TC_选择:全部选择:仅文件
QZTC_cm_SelectAllFiles()
Return
40A12E15-A73C-4D3C-89B4-23D4B114665B:
;TC_标签:上一个标签(Ctrl+Shift+Tab)
QZTC_cm_SwitchToPreviousTab()
Return
4126487C-41A1-4FE2-A79E-9EF114DDA508:
;Word_字号-小初(36)
Word_setFontSize(36)
Return
41520966-4CB0-42EF-9A22-AC2BB4D787BC:
;TC_排序:右窗口:按第4列排序
QZTC_cm_RightSortByCol4()
Return
421B4460-8697-4BE2-83A3-1CD1AB0D3A3B:
;TC_返回上级目录
Postmessage, 1075, 2002,0,, ahk_class TTOTAL_CMD
Return
422655D8-FECB-4F36-94FA-5E59F679B59A:
;通用_查找（Ctrl+F）
    sendinput,^f
Return
42307B72-14C0-4B51-B657-41243446E625:
;Word_图片-四周型(0)
Word_setShape_WrapFormat(0)
Return
42403188-28DD-4DAE-917E-622BBB0E1A05:
;TC_左窗口:只展开选中的文件夹
QZTC_cm_LeftDirBranchSel()
Return
429558E1-98E5-47C3-9C9E-EE1565D4D4B3:
;TC_自定义列视图:左窗口:自定义列视图8
QZTC_cm_LeftCustomView8()
Return
431641C9-B12C-4B97-95AB-E60C3F6F1EBB:
;Excel_筛选-数值大于（>）的单元格
Excel_Filter_Greater()
Return
452DF4A0-5588-4960-A9BF-02CE8EBB5C69:
;TC_视图:切换独立文件夹树面板状态
QZTC_cm_SwitchSeparateTree()
Return
4559EFCA-D819-4A94-8AEE-774DD7161CB3:
;TC_网络:断开网络驱动器
QZTC_cm_NetDisconnect()
Return
4584F58C-D702-4D70-8B94-FE6FE2E275EE:
;TC_自定义列视图:右窗口:自定义列视图8
QZTC_cm_RightCustomView8()
Return
45B24470-577B-4A59-8938-038746DBD97D:
;TC_网络:共享当前文件夹
QZTC_cm_NetShareDir()
Return
45C7C344-035C-4CD1-8071-2BAC6AA3F3B7:
;Phantom_页面管理-插入页面-从文件
WinMenuSelectItem, A,, 页面管理,插入页面,从文件
sendinput,{tab}
sleep,50
sendinput,{enter}
Return
46386D69-55C0-4992-85DA-72D4D50D6BEB:
;TC_VIM:移动到最后一行
TC_LastLine()
Return
464AFDF3-B61B-4BCD-BD05-F228053B4855:
;TC_标签:右窗口:激活标签3
QZTC_cm_RightActivateTab3()
Return
464B2B9D-3227-4D2B-850A-85EFBD8DAD52:
;TC_VIM:创建空文件
;TC_CreateBlankFile()
Return
46C845D3-ACD1-4828-9EC0-84E6334A48B9:
;测试用_全局热键
msgbox ,显示本消息说明，全局热键成功
Return
46CFC94F-36D9-4067-A16D-16B1FF3CAD78:
;TC_标签:左窗口:激活标签4
QZTC_cm_LeftActivateTab4()
Return
46DB8ECB-AA74-4D84-8983-5D1E96B36F27:
;TC_选择:全部取消:文件和/或文件夹(视配置而定
QZTC_cm_ClearAllCfg()
Return
47071646-3484-4B05-AADE-87F2EEF1D912:
;Word_粘贴格式
Word_PasteFormat()
Return
47156376-1C70-4506-AE7E-1D9CF661F7C8:
;Excel_定位-到当前区域（下）单元格
Excel_Location_EdgeNextCell("下")
Return
4736F40A-4292-4E09-9434-736736A7E2BB:
;&3  压缩30% 以BetterJPEG
SelPath:=QZData("files")
MyAppPath:=QZData("%BetterJPEG%")
Run,%MyAppPath%,,Max

WinWait,ahk_exe BetterJPEG.exe,,5
if ErrorLevel		;如果5秒没激活，则退出
	return
WinActivate
ControlSetText,Edit1,%SelPath%,A
sleep,100
controlsend,Edit1,{enter}
sleep,2500
;~ WinMenuSelectItem,a,,文件,选择所有项目
ControlClick, x80 y280, ahk_exe BetterJPEG.exe,,RIGHT,, Pos	;相对于窗体左上角的相对位置点击
;sendinput,{AppsKey}
sendinput,{down 8}
sleep,50
sendinput,{enter}
sleep,500
ControlClick, x80 y280, ahk_exe BetterJPEG.exe,,RIGHT,, Pos	;相对于窗体左上角的相对位置点击
;~ sendinput,{AppsKey}
sendinput,{down 3}
sleep,50
sendinput,{right}
sleep,50
;~ sendinput,{down 1}	;50%
sendinput,{down 2}	;30%
;~ sendinput,{down 5}	;10%
sendinput,{enter}		;不下移75%，否则按上面
sleep,100
sendinput,{enter}	
Return
4785A468-26CA-466B-8420-4364F992FE71:
;TC_自定义列视图:目标窗口:上一个自定义视图
QZTC_cm_TrgPrevCustomView()
Return
47F550FE-6A70-4547-BF06-AC229F4994F2:
;TC_配置:更改开始菜单
QZTC_cm_ChangeStartMenu()
Return
47F9B4F9-2095-4C2E-A22D-7133604839DA:
;&U  文件、文件夹移动到上级文件夹
MySel:=QZData("Files")
;msgbox % MySel
MyParentDir:=
MyGrandDir:=
loop,Parse,% MySel,`n,`r    ;循环读取每一行
{
	MyTemFile := trim(A_loopfield)
	if (A_index=1)
	{
		SplitPath,MyTemFile,,MyParentDir		;所选文件的父目录
		SplitPath,MyParentDir,,MyGrandDir		;父目录的上级目录
	}
	if InStr(FileExist(MyTemFile), "D")  ;区分是否文件夹,Attrib= D ,则是文件夹
	{
		SplitPath,MyTemFile,SourDir
		FileMoveDir, %MyTemFile%, %MyGrandDir%\%SourDir%
	} else {
		FileMove,%MyTemFile%,%MyGrandDir%
	}
}
Return
4804A893-0EE5-440A-B483-D75DF9E4F29C:
;TC_视图:显示/隐藏:功能键按钮
QZTC_cm_VisKeyButtons()
Return
482EE792-DC8B-4A88-B210-A8DBE586D324:
;Excel_筛选-与所选单元格后1-2个字符相同
Excel_Filter_EqualAsBehind(2)
Return
485234F9-BC22-43D2-9BD4-6375E0283965:
;TC_自定义列视图:左窗口:自定义列视图10
;QZTC_cm_LeftCustomView10()
Return
48B800EE-6DE7-4FCD-8989-705F3F229E62:
;TC_其他:打开命令提示符窗口
QZTC_cm_ExecuteDOS()
Return
48BC9C2F-DA59-4E77-B013-1EAC17E64444:
;Phantom_页面管理-旋转-全部-180
;sendinput,!o
;sendinput,t
WinMenuSelectItem, A, , 页面管理, 旋转页面
controlclick,combobox1,,旋转页面,,
sendinput,{down}
sendinput,{down}
sendinput,{tab}
sendinput,{up}
sendinput,{up}
sendinput,{up}
sendinput,{enter}
Return
497BDE25-BFC4-4272-AA6A-D2B84A58D724:
;Word_插入图片
send,^i
Return
49DDF6AC-3B59-4D73-BE01-1A6CEBB2C3B3:
;标签测试（示例）
;文件标签
msgbox % QZData( "Files" )
msgbox % QZData( "FileExt" )
msgbox % QZData( "FileName" )
msgbox % QZData( "FileDir" )
msgbox % QZData( "FileMulti" )
msgbox % QZData( "{file:path}" )
;变量
msgbox % QZData( "%Photoshop%" )
;文本
msgbox % QZData( "{text}" )
msgbox % QZData( "{text:cp0}" )
msgbox % QZData( "{text:utf-8}" )
msgbox % QZData( "{select}" )
;日期时间
msgbox % QZData( "{date:yyyyMMdd}" )
msgbox % QZData( "{date:yyyy-MM-dd}" )
msgbox % QZData( "{date:yyyy.MM.dd}" )
msgbox % QZData( "{date:yyyyMMdd_HHmmss}" )
msgbox % QZData( "{date:yyyy年MM月dd日HH时mm分}" )
msgbox % QZData( "{date:yyyy年MM月dd日_HH时mm分ss秒}" )
;输入对话框
msgbox % QZData( "{input:1234}" )
msgbox % QZData( "{input:44444:hide}" )
;文件对话框
msgbox % QZData( "{box:filebrowser}" )
msgbox % QZData( "{box:folderbrowser}" )
;列表框
msgbox % QZData( "{box:list[www.163.com][114.114.114.114][www.baidu.com]}")

Return
49DF1DFF-23B0-4A6A-A93B-18C555C9A0D0:
;Excel_筛选-与所选单元格前1-3个字符相同
Excel_Filter_EqualAsFront(3)
Return
49FB5B85-0BC9-4CCD-8411-1E721F8C1429:
;Word_设置/取消粗体
Word_setBold()
Return
4A44FDE0-DFDD-4953-B7BF-DFC99623961A:
;TC_配置:制表符
QZTC_cm_ConfTabChange()
Return
4A9EF022-E7DF-439D-A341-3BFBDEA8CBFC:
;TC_配置:语言
QZTC_cm_LanguageConfig()
Return
4AC70C9E-D885-4E8C-9F0B-7F69FBAC5B37:
;Excel_运行宏-临时4
sendinput,{Enter}
;comObjactive("excel.application").run("Personal.xlsb!公式类_2粘贴数据公式")
global excel
Excel_Get()
excel.Cells(1,6).select
Excel_Destroy()
Return
4AE8C1E5-36AF-4799-A40D-3078ADAE8885:
;TC_排序:右窗口:按第2列排序
QZTC_cm_RightSortByCol2()
Return
4B30EA1B-73AD-4E12-B312-0808A8DD334E:
;TC_自定义列视图:右窗口:自定义列视图1
QZTC_cm_RightCustomView1()
Return
4BA7635C-B74E-47B9-8184-5367C0856D21:
;TC_VIM:后退另一侧
TC_GotoPreviousDirOther()
Return
4BB71AF0-AA9C-44CF-8203-9648A104B5DD:
;Excel_视图-排序
Excel_Dialogs_Sort()
Return
4BC61A98-394B-45B1-AD2A-26852AF394B9:
;Excel_格式-对齐-水平-居中
Excel_Format_SetAlignment("水平","居中")
Return
4BC6CC9C-16BE-49D8-8C19-89F2FCF67EE3:
;Word_插入分页符-下一页(0)
Word_insertBreak(0)
Return
4C54DFF9-17CE-4005-A90A-E1D3C7C775BA:
;TC_帮助:帮助索引
QZTC_cm_HelpIndex()
Return
4D085B03-FACA-4A54-BB24-7048EDB273DE:
;TC_测试Ctrl+1
FilesArray:={}
QZ_GetClip(FilesArray)
msgbox % FilesArray.files
msgbox % FilesArray.text

ExeArray:={}
QZ_GetWinInfo(ExeArray)
msgbox % ExeArray.x
msgbox % ExeArray.y
msgbox % ExeArray.HWND
msgbox % ExeArray.WinClass
msgbox % ExeArray.WinExe
msgbox % ExeArray.WinControl
msgbox % ExeArray.WinTitle
Return
4D31646C-45A7-4138-B43C-2C68668094AD:
;TC_标签:目标窗口:激活标签9
QZTC_cm_TrgActivateTab9()
Return
4E0A0660-E9E1-41DF-8759-5352511AB2CD:
;通用_返回（Esc）
sendinput,{esc}
Return
4E0D4983-16D2-4D7C-91A0-B823CE75BB1E:
;TC_配置:刷新
QZTC_cm_RefreshConfig()
Return
4E0F8C27-1825-4C43-B07F-AD48C00D0BB7:
;Excel_格式-百分号
Excel_Format_SetPercent()
Return
4E350CE1-9B61-4C28-9D4D-DB59548426BD:
;Word_字体-宋体
Word_setFontName("宋体")
Return
4E5A1B4F-E53E-401C-B56F-8A1EFA43817E:
;Excel_行-行高减小
Excel_Row_SetHeight("-1")
Return
4E703225-8917-445D-AE42-F0893A087D79:
;Word_段落行距-1.5倍(1.5)
Word_setLineSpacing(1.5)
Return
4F1995B8-8561-4A9C-8A18-861EF50ED648:
;TC_标签:左窗口:激活标签6
QZTC_cm_LeftActivateTab6()
Return
4F511E1C-4527-4122-87E7-696E116EBBA2:
;Excel_筛选-与所选单元格后1-8个字符相同
Excel_Filter_EqualAsBehind(8)
Return
4FC8D350-FC32-45DF-9F6B-3076914C55DC:
;Excel_文件-退出Excel
Excel_CloseExcel()
Return
4FEB3C77-EAB7-417C-9D1A-D9069E9AC415:
;TC_标签:来源窗口:激活标签5
QZTC_cm_SrcActivateTab5()
Return
505570AD-D286-4962-A360-F27A0F5D3814:
;Excel_格式-对齐-水平-跨列对齐
Excel_Format_SetAlignment("水平","跨列对齐")
Return
50FA47E2-8FE9-4519-9AF1-851D6F42AEF6:
;TC_视图:开启/关闭:8.3式文件名小写显示
QZTC_cm_Switch83Names()
Return
5138AAE9-D491-4697-8171-F3E9A72E10EA:
;TC_配置:保存设置
QZTC_cm_ConfigSaveSettings()
Return
51D94534-1B39-47EA-880C-013502C0A68B:
;TC_标签:来源窗口:激活标签1
QZTC_cm_SrcActivateTab1()
Return
51DAE8C0-1B57-46E1-A05A-4E5A7ACA175E:
;TC_VIM:将当前光标下的文件重命名为备份
TC_FileMoveForBak()
Return
51F58801-FCE1-429F-BA54-D8BD7F73D457:
;TC_配置:FTP
QZTC_cm_FtpConfig()
Return
5260208B-F3A7-49DA-B0C2-CD8909CB658C:
;TC_文件操作:重命名(Shift+F6)
QZTC_cm_RenameOnly()
Return
52783379-56CB-471B-85CC-2ABCE5F9747B:
;切换到【普通模式】

vimd.changemode("普通模式")
Return
53BF25FA-7390-4327-BFEA-492D8A8DF22B:
;TC_网络:取消文件夹共享
QZTC_cm_NetUnshareDir()
Return
5417C664-CBB5-4F4A-9101-CCBC99FC0FDD:
;TC_帮助:访问Totalcmd网站
QZTC_cm_VisitHomepage()
Return
541BC8C3-C338-49AE-A0D9-EA52459E79D8:
;PotPlayer_声音减小
sendinput,{down}
Return
541BF3CF-E2B0-45F3-827F-68DBEF05DFED:
;Word_放大5%
Word_Zoom("+5")
Return
542C7D72-88A9-4748-8C24-E9075C1FB270:
;TC_用户:可定义其他用户菜单
QZTC_cm_UserMenu10()
Return
54568C84-BF05-44E2-BB25-257EA7E55386:
;TC_切换到【普通模式】

vimd.changemode("普通模式")
MsgBox, 0, 提示, 【普通模式】, 0.3

Return
547039AB-E729-4DB1-8144-699C67468012:
;Word_段落行距-3倍(3)
Word_setLineSpacing(3)
Return
54784AC1-3E96-454A-B8A0-2881CC22D1D2:
;Excel_工作表循环-定义原始工作表
Excel_Worksheet_DefSwitchFrom()
Return
549931E5-9F4F-4DB4-9444-61989E243591:
;TC_自定义列视图:停止后台加载备注
QZTC_cm_ContentStopLoadFields()
Return
549CE6A1-1F37-48A6-81D5-C258A0098A2F:
;Excel_运行宏-临时1
try
comObjactive("excel.application").run("Personal.xlsb!公式类_1复制数据公式")
Return
54C2B612-10BC-49D7-9A33-432818266A3F:
;Excel_格式-对齐-垂直-靠下
Excel_Format_SetAlignment("垂直","靠下")
Return
55129E91-E242-4830-A54E-E5546FC72459:
;TC_文件操作:复制到当前窗口
QZTC_cm_CopySamepanel()
Return
55264A16-BCC5-42D4-A6DC-A1A8138EFBD5:
;TC_排序:右窗口:按第10列排序
;QZTC_cm_RightSortByCol10()
Return
55891D59-6019-4CD8-B045-5A6870964AE8:
;Excel_定位-列首个单元格
Excel_Location_ColumnFirstCell()
Return
55E3CC3D-938F-4505-8DF2-4E8C2442CE90:
;Excel_其他-十字光标-取消
;---------------------------------------
;作用：十字光标显示
Excel_CursorCross(0)
Return
56121F61-64B4-4151-9146-DB37957F9A9B:
;Phantom_文件-打印从到
InputBox, NewString, 输入, 请输入页码范围`n如：1-4或2`,4-8, , 300,150
if ErrorLevel
	return
if (NewString="")
	return
else
{
	sendinput,^p
	sleep,300
	sendinput,!e
	sleep,100
	ControlSetText, Edit3, %NewString%, , 打印
	sleep,300
	sendinput,{enter}
}
Return
5631AD15-1546-49EA-A678-9A5C8B1B8C41:
;TC_文件操作:压缩文件
QZTC_cm_PackFiles()
Return
56469B26-129C-4776-BBD8-63323674E904:
;Excel_格式-字体颜色-红
Excel_Format_SetColor("tr")
Return
568FB290-4E04-445C-9FE3-8FFBE1ED98E2:
;Excel_格式-缩进对齐-取消
Excel_Format_InsertIndent(-1)
Return
571C850B-8679-4923-B245-A8391AA249F7:
;TC_自定义列视图:来源窗口:自定义列视图1
QZTC_cm_SrcCustomView1()
Return
5723A1AE-AAFC-4A10-ADD3-FA1B0EC2D1F1:
;&T  打开快捷方式所指目录(TotalCMD)
MySel:=QZData("files" )
TLAppPath:=QZData("%TOTALCMD%")
FileGetShortcut,%MySel%,MyTemFile
SplitPath,MyTemFile,,MyOutDir
Run,%TLAppPath% /T /R="%MyOutDir%"
Return
57D250A1-3F2C-44FD-BC75-112E3818E2C2:
;TC_右窗口:显示文件备注
QZTC_cm_RightComments()
Return
57E7AE7B-560A-4E22-832E-7E746FF5A007:
;TC_其他:显示光标处文件的内部关联快捷菜单
QZTC_cm_ContextMenuInternalCursor()
Return
586BED51-52E0-46E0-8637-FB7A47CB1E4B:
;Excel_筛选-与所选单元格前1-2个字符相同
Excel_Filter_EqualAsFront(2)
Return
588F9E52-B4B3-46A1-8E78-810FBC89BF36:
;Excel_筛选-数值小于（<）的单元格
Excel_Filter_Lesser()
Return
58C38C2B-0717-4F3E-9622-C919389C2DF1:
;Excel_筛选-自动筛选
Excel_Filter_AutoFilter()
Return
5931BB1C-59C7-44D3-B451-77BF3A674E78:
;Excel_筛选-与所选单元格后1-4个字符相同
Excel_Filter_EqualAsBehind(4)
Return
59AFED4F-45CF-4C0E-B7F4-D57B05DD4453:
;TC_排序:右窗口:按第6列排序
QZTC_cm_RightSortByCol6()
Return
59F2A146-5EF8-4EC3-A1FB-3703783C005F:
;Word_首行缩进2字符(0.35)
Word_setFirstLineIndent(0.35)
Return
5A40EFDB-EA2B-48B6-98AF-3E0A8690B815:
;TC_标签:来源窗口:激活标签3
QZTC_cm_SrcActivateTab3()
Return
5AB7ED0B-2307-4EE7-998E-F68135158BFC:
;TC_文件操作:复制到另一窗口(F5)
QZTC_cm_CopyOtherpanel()
Return
5ABD9A82-2D4F-4D15-BFB5-AD4C21B87DA3:
;Phantom_页面管理-旋转-当前页-逆90
;sendinput,!o
;sendinput,t
WinMenuSelectItem, A, , 页面管理, 旋转页面
controlclick,combobox1,,旋转页面,,
sendinput,{enter}
controlclick,Button7,,旋转页面,,
Return
5B390DEE-8D43-42A3-BD9E-CE6D588AE1DF:
;TC_VIM:复制到常用文件夹
TC_CopyDirectoryHotlist()
Return
5B43C5FF-48B3-43BF-952D-F365B6C3AC6B:
;Word_字号-初号(42)
Word_setFontSize(42)
Return
5B8EF5E2-1FC3-4E88-9289-ECE41FF6D186:
;通用_删除（Del）
    SendInput,{del}
Return
5C0141A0-E293-4D56-B297-D4929EA9F8C1:
;TC_自定义列视图:左窗口:自定义列视图2
QZTC_cm_LeftCustomView2()
Return
5C63687C-AF01-4341-85A9-ADEEE46FE39B:
;Word_字体-黑体
Word_setFontName("黑体")
Return
5D460012-A377-4065-A968-0937534DD7B0:
;TC_视图:开启/关闭:两个独立文件夹树面板
QZTC_cm_ToggleSeparateTree2()
Return
5D721C2A-1927-4435-89B6-B23AE098DB05:
;Word_缩小5%
Word_Zoom("-10")
Return
5DD81267-1361-4723-9BB9-CC14C4462706:
;Excel_页面设置-以当前单元格的值设置页眉右侧
Excel_PageSetup_SetHeader("R","")
Return
5E0ECBFD-3C81-49CB-9286-ADB2957443D8:
;&C  文件、文件夹复制到(...)
MySel:=QZData("files")
FileSelectFolder,MySelDir,*,3
if (MySelDir="")
	return
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	SplitPath,MyTemFile, SourceFolderName ; 仅从它的完全路径提取文件夹名称。
	if InStr(FileExist(MyTemFile), "D")  ;区分是否文件夹,Attrib= D ,则是文件夹
		FileCopyDir, %MyTemFile%, %MySelDir%\%SourceFolderName%、
	else
		FileCopy,%MyTemFile%,%MySelDir%
}
Return
5E3BF371-2B63-4CEF-8F9C-1BFD8F797E08:
;TC_标签:左窗口:激活标签8
QZTC_cm_LeftActivateTab8()
Return
5E71C897-D541-4533-873E-4D8FDD708997:
;Excel_运行宏-临时2
try
comObjactive("excel.application").run("Personal.xlsb!公式类_2粘贴数据公式")
Return
5F2BB068-80D6-452B-A4A0-0A5E1E26FAEC:
;Word_段落行距-2.5倍(2.5)
Word_setLineSpacing(2.5)
Return
5FC4095E-2C13-4689-9E53-F34373FFB464:
;&X  FireFox窗口大小改变
Curhwnd:=QZData("hWnd")
WinActivate,Ahk_ID %Curhwnd%
winGetPos,X,Y,Width,Height,A
CurWidth:=1030
CurHeight:=900
if (Width/CurWidth>1.5)
winmove,A,,,,%CurWidth%,%CurHeight%
else
WinMaximize,A
WinMove, A,, (A_ScreenWidth/2)-(CurWidth/2), (A_ScreenHeight/2)-(CurHeight/2)
Return
5FE0A3A1-35AD-442F-99BD-BB255C63DD90:
;Phantom_视图-适合页面
;send,!v
;send,p
;send,s
WinMenuSelectItem, A, , 视图, 页面布局,单面
;send,^2
WinMenuSelectItem, A, , 视图, 缩放,适合页面
Return
60826C34-552E-4986-B1B5-F8A851EF17E4:
;Excel_列-删除选中列
Excel_Column_DeleteSelect()
Return
60BC6DFB-0669-4431-B14A-8E9719A1994A:
;Excel_选择-区域-到当前区域边缘-右
Excel_Selection_AddRegion("右")
Return
611A7A8C-2D1E-42D0-BE78-8C7BC6B3CAAA:
;&F  扫描图标保存到文件夹
FileSelectFolder, SaveDir, *, 3，请选择要保存图标的目录
if SaveDir!=
{
    if (substr(SaveDir,-1)!="\")
        SaveDir=%SaveDir%\
    GetFiles:=QZData("{file:path}")
    ;GetFiles:=QZData("files")
    RunCmd=Apps\iconsext\iconsext.exe /Save  "%GetFiles%"  "%SaveDir%"  -icons
   ;msgbox % RunCmd
   run ,% RunCmd
}
Return
61DE4349-C254-4047-A463-53DD8B4DF084:
;TC_来源窗口:自定义类型
QZTC_cm_SrcUserDef()
Return
62219A2B-960B-45A1-A91B-B0323B70A3C6:
;TC_文件操作:合并文件
QZTC_cm_Combine()
Return
623287F7-394B-4F41-9B3F-BA53436BEEC3:
;TC_选择:导出选择列表
QZTC_cm_SaveSelectionToFile()
Return
623A6090-5F1E-488F-93BD-95A400F6ABCE:
;Excel_其他-查找下一项
Excel_Find_NextOrPrevious("N")
Return
624F3AEF-82F8-4772-98D4-6A61FA876A83:
;TC_文件操作:创建校验文件
QZTC_cm_CRCcreate()
Return
626B36C9-54DD-490A-90B0-80399CB9513E:
;TC_视图:展开所有文件夹
QZTC_cm_DirBranch()
Return
63283789-8757-46FC-9007-84BF51765310:
;Excel_单元格-格式-日期(2017-01-01)
Excel_Format_Date("-")
Return
63414894-BCD8-41FE-BC52-E3BDEF0EDCBE:
;Word_段落行距-4.5倍
Word_setLineSpacing(4.5)
Return
63599587-9432-47A7-BD01-C1FBB0E8AD9F:
;TC_VIM:同回车键，但定位到第一个文件
TC_SuperReturn()
Return
63E77496-8F60-4BDB-B181-0E88020B8640:
;TC_右窗口:按扩展名排序
QZTC_cm_RightByEx()
Return
645B6E59-CE2D-4848-BC93-F9A82A1CF0CC:
;Excel_页面设置-在页眉右侧设置当前日期
Excel_PageSetup_SetHeader("R","&D")
Return
64A34417-04E4-4495-9824-74F53300AF91:
;TC_FTP:FTP连接
QZTC_cm_FtpConnect()
Return
64B191F7-30E8-480C-9698-C540E8C049A4:
;Word_保存Word文件
Word_SaveFile()
Return
64BA3BC1-7751-4A7A-A849-C48EBCB87485:
;TC_视图:显示/隐藏:当前文件夹
QZTC_cm_VisCurDir()
Return
64BDFEF1-3DEA-4354-AE2F-EEEC24502775:
;TC_左窗口:所有文件
QZTC_cm_LeftAllFiles()
Return
650588FE-25CB-44DB-B614-D1F3D723CC95:
;Excel_行-插入行-当前单元格下方
Excel_Row_Insert("B")
Return
6565A57F-48A2-4D99-AEDA-D1E4BCE7C7D2:
;Word_图片-嵌入型(7)
Word_setShape_WrapFormat(7)
Return
659FCC1E-80F4-48B3-A1DD-C6A63CDE2872:
;Excel_剪贴板-粘贴为数值
Excel_Cliboard_PasteAsValue()
Return
66034F3F-B917-4576-A0B3-BA531D93C09C:
;Excel_单元格-删除单元格-右侧单元格左移
Excel_Selection_Delete("左移")
Return
6623131A-05ED-415C-AB7A-D206254BEEA4:
;Word_段落行距-2倍(2)
Word_setLineSpacing(2)
Return
672C6B08-88AB-4BE3-B2D7-4383F9FF1A09:
;Phantom_页面管理-提取页面-从到
;sendinput,!o
;sendinput,e
WinMenuSelectItem, A, , 页面管理, 提取页面
sleep,300
sendinput,s
sleep,100
sendinput,{space}
Return
6735DAFE-55FA-457D-8CC2-D8CFB8A4EA16:
;通用_关闭（Alt+F4）
send,!{f4}
Return
6736A3E3-777C-4BF6-A706-CBCE89936C6D:
;TC_VIM:取消文件标记，将文件注释清空
TC_UnMarkFile()
Return
676A0E94-7377-4214-904D-C235B5099C42:
;TC_VIM:切换视图布局
TC_SrcViewChange()
Return
67838606-5529-4BEF-8862-C9AA8C23C084:
;TC_自定义列视图:右窗口:自定义列视图5
QZTC_cm_RightCustomView5()
Return
67A36BEC-D1A9-49F9-981F-C2E62E3F6DA4:
;Phantom_编辑-菜单选择标签内容
global CurID
global PageStr

MouseGetPos,CurX,CurY
menu,RMenu,Add
menu,RMenu,DeleteAll
loop,% PageStr.MaxIndex()
	menu,RMenu,add,% PageStr[A_index],MySub_AddPDFLebal
menu,RMenu,show,%CurX%,%CurY%
return

MySub_AddPDFLebal:
	;sendinput,!e
	;sendinput,d
WinMenuSelectItem, A, , 编辑, 添加书签
	sleep,300
	sendinput,%A_ThisMenuItem%
	sleep,100
	sendinput,{enter}
	sleep,100
	mouseclick,,500,500
	sleep,300
	sendinput,{PgDn}
return
Return
67B8ABEE-97C1-4445-B06B-43C7C1FD97BC:
;TC_自定义列视图:左窗口:自定义列视图6
QZTC_cm_LeftCustomView6()
Return
68378E41-2778-4BAE-B8DC-8A1B21C1B32B:
;&C  Unicode码转为中文
QZSel:=CustomFunc_QZSel()
Text:=QZSel.text
Text:=CustomFunc_uXXXX2CN(Text)
/*

While pos := RegExMatch(text, "\\u\w{4}")
{
  b := SubStr(text, pos+2, 4)
  b := uXXXX2CN(b)
  text := RegExReplace(text, "\\u\w{4}", b, "", 1)
}
*/

MsgBox, 262145, 转换结果, %text%`n`n======`n`n确定：复制到剪贴板`n取消：直接退出
ifmsgbox, yes
	Clipboard:=Text

return
Return
68C87210-914B-473C-BD33-21A346F280C2:
;TC_配置:ZIP压缩程序
QZTC_cm_ZipPackerConfig()
Return
690EE1C6-B027-4AAF-9254-74852801AE95:
;TC_移动到另一窗口
Postmessage, 1075,1005, 0,, ahk_class TTOTAL_CMD
sleep,300
sendinput,{Enter}
Return
697D0286-04E6-4E0C-A400-FC8AFA4D8AF6:
;TC_自定义列视图:所有文件都按需加载备注
QZTC_cm_LoadAllOnDemandFields()
Return
69ECF897-17E2-4D97-9F40-4A5B6099FA85:
;Excel_格式-对齐-垂直-居中
Excel_Format_SetAlignment("垂直","居中")
Return
69F53709-CC57-48CD-9CD9-2AAF42341BEA:
;Excel_单元格-格式-通用
Excel_Format_Normal()
Return
6A17FF5E-3D59-473D-898A-3E75A4E7397A:
;PotPlayer_声音增大
sendinput,{up}
Return
6A834929-F5BD-47A4-B61B-E30DE411BD69:
;Excel_单元格-格式-日期(2017/01/01)
Excel_Format_Date("/")
Return
6A893A49-6D26-4D4C-81E8-201D01707A99:
;Excel_格式-减少小数位
Excel_Format_SetDecimalNum_Shrink()
Return
6AADE2B0-DA5E-403C-9B90-13CFA2063774:
;TC_用户:用户菜单4
QZTC_cm_UserMenu4()
Return
6ABFEFBF-F892-4A5E-B1F1-C0E719571074:
;&F  使用Foxit_Phantom批量合并文件
MySel:=QZData( "Files" )
run "%A_ahkpath%" "%A_ScriptDir%\Apps\使用Foxit_Phantom批量合并文件.ahk" "%MySel%"
Return
6B370CF5-16FF-40ED-9299-0D78B79B61F9:
;TC_其他:计算占用空间
QZTC_cm_GetFileSpace()
Return
6B6E707F-8F98-4106-8363-C70595674CB6:
;TC_视图:启用/禁用:自定义隐藏文件
QZTC_cm_SwitchIgnoreList()
Return
6BEC6ED2-3E62-4D5D-BB24-37E68536D61B:
;TC_其他:设置卷标
QZTC_cm_VolumeId()
Return
6BF899CC-328D-4BE4-BFB1-97A69271F054:
;TC_VIM:连续搜索
TC_SearchMode()
Return
6C3C6E8C-2FAB-48C0-978B-A2EC2F2869EF:
;TC_标签:左窗口:激活标签7
QZTC_cm_LeftActivateTab7()
Return
6C7E2707-2E86-4D3C-9466-32EE07B8E59A:
;TC_标签:右窗口:激活标签9
QZTC_cm_RightActivateTab9()
Return
6CDC0E20-4D7E-4683-A44D-CE8D7056BFF9:
;TC_右窗口:按日期时间排序
QZTC_cm_RightByDateTim()
Return
6D646034-E7E1-4063-AAFB-2F2427A5F0C5:
;Word_字号-一号(26)
Word_setFontSize(26)
Return
6D92886A-B9EA-4207-8AA5-9E11CE5EC2A1:
;Word_保存并退出Word
Word_SaveAndExit()
Return
6D98CA4F-A7E7-4F2F-89EE-DFCB43E0393A:
;TC_自定义列视图:右窗口:自定义列视图4
QZTC_cm_RightCustomView4()
Return
6E08AE8A-5801-4AB1-95A4-C57B71EE54D9:
;TC_安全:获取所有权(NTFS)
QZTC_cm_EditOwnerInfo()
Return
6E1B4536-C2C0-40F7-A775-95212189C487:
;切换到【VIM模式】

vimd.changemode("VIM模式")
Return
6E877D15-DF9F-40ED-A9D5-A568E87572FE:
;Excel_格式-填充颜色-黄
Excel_Format_SetColor("ry")
Return
6EA62D87-135B-4388-8EBE-FA1B33EAB173:
;TC_VIM:文件模板
TC_CreateNewFile()
Return
6EE468A6-C804-4EA9-970A-A515C6D0EA81:
;TC_VIM:启用/关闭：自动扩大本侧窗口
TC_Toggle_AutoPercent()
Return
6F14F83A-9E9A-4D6C-A4E9-6AF7C81EFE6B:
;TC_标签:新建标签(在后台)
QZTC_cm_OpenNewTabBg()
Return
6F7624DB-76E8-4BEE-9285-2CC9204B18C3:
;TC_复制到另一窗口
Postmessage, 1075, 3101, 0,, ahk_class TTOTAL_CMD
sleep,300
sendinput,{Enter}
Return
6F77EA5F-96BA-435B-9D2E-E43D8033FACF:
;Excel_定位-到当前区域边缘-左
Excel_Location_EdgeCell("左")
Return
6F7ED6E9-5C75-4B23-9CEF-F4A0C59892D3:
;TC_排序:左窗口:按第4列排序
QZTC_cm_LeftSortByCol4()
Return
6FB7BC7B-D3E0-4D19-8D7B-182095B685FA:
;TC_标签:来源窗口:激活标签10
;QZTC_cm_SrcActivateTab10()
Return
6FBF614A-60D1-4702-8EEB-184EB031320C:
;TC_配置:更改工具栏
QZTC_cm_ButtonConfig()
Return
7000C0F0-B3DA-4D06-839B-B5DF1B520280:
;TC_自定义列视图:左窗口:自定义列视图3
QZTC_cm_LeftCustomView3()
Return
704BEE66-B048-4B6C-B119-EC823CC71DC6:
;TC_视图:显示/隐藏:文件夹历史记录和常用文件夹按钮
QZTC_cm_VisHistHotButtons()
Return
70647EBA-42D6-45B4-BC8B-3700D500523E:
;TC_全不选
Postmessage, 1075, 524, 0,, ahk_class TTOTAL_CMD
Return
70836CC5-C874-46B0-B7B5-413CF0C58CA4:
;TC_选择:导出详细信息(Unicode)
QZTC_cm_SaveDetailsToFileW()
Return
70DE277C-B8E0-4605-9D58-FB33F3C76267:
;PotPlayer_播放/暂停
sendinput,{space}
Return
714A8864-7AA3-4F54-BB3E-76F032653AB9:
;TC_排序:目标窗口:按第8列排序
QZTC_cm_TrgSortByCol8()
Return
715F4C79-0527-4DF7-86CC-643400EF39E6:
;Word_图片-上下型环绕(4)
Word_setShape_WrapFormat(4)
Return
7181D6A5-AEEA-4EDD-BFEB-8407E5B65001:
;TC_命令行:清除命令行
QZTC_cm_ClearCmdLine()
Return
72016A49-847B-4134-8A97-8CEF0DA0F2C1:
;Excel_行-插入行-当前单元格上方
Excel_Row_Insert("T")
Return
72161276-EE4F-48DD-8903-D31136B4521C:
;Excel_选择-单元格-向下添加
Excel_Selection_AddRange("下")
Return
72238DFD-E3F2-44BC-A403-8C98FB3BAD11:
;Phantom_页面管理-删除当前页
;send !o
;send d
WinMenuSelectItem, A, , 页面管理, 删除页面
send o
send {enter}
Return
72820663-9AB6-47F7-BEF5-9DF1EF55DA47:
;TC_VIM:解压文件到当前文件夹
TC_UnpackFilesToCurrentDir()
Return
72A4F3BE-3FCF-4AD1-A2EE-31DE161136A0:
;TC_选择:导入选择列表(从剪贴板)
QZTC_cm_LoadSelectionFromClip()
Return
72CA1375-2C6C-4BDC-B786-6E91343D4F07:
;TC_用户:用户菜单5
QZTC_cm_UserMenu5()
Return
72CE4F31-9A7E-489B-AC87-024D0220F52B:
;Excel_文件-保存并退出Excel
Excel_SaveAndExit()
Return
734A3463-00CA-4C33-AC0B-5C13D0CFFEF6:
;TC_右窗口:缩略图
QZTC_cm_RightThumb()
Return
735075E2-DDA2-41FF-9221-761ED51F7F5C:
;TC_选择:不选一组:仅文件夹
QZTC_cm_ClearFolders()
Return
73769782-7F24-4650-ABCF-1C2CD31CAEFD:
;Excel_单元格-格式-日期(20170101)
Excel_Format_Date("d")
Return
74B7C121-BDB7-4D1B-A0B4-989BBDD964B7:
;Word_字号-小六(6)
Word_setFontSize(6)
Return
74C360A5-C54F-4285-9C83-81A2992101A7:
;TC_导航:转到驱动器D
QZTC_cm_GotoDriveD()
Return
74FCCEFF-0210-4B7E-B0C4-81F7B76919AE:
;Phantom_页面管理-提取页面-当前
;sendinput,!o
;sendinput,e
WinMenuSelectItem, A, , 页面管理, 提取页面
sleep,300
sendinput,s
sleep,100
sendinput,{space}
sendinput,{enter}
Return
750E6679-56E2-40CD-B701-CAFBE7856543:
;Excel_列-选中列-显示
Excel_Column_Hide(0)
Return
75731152-35B2-49A7-8B69-8C32846F8B50:
;TC_VIM:粘贴文件，如果光标下为目录则粘贴进该目录
TC_PasteFileEx()
Return
75B1C37C-151E-465B-B8E4-283C421ED672:
;TC_左窗口:关闭快速查看窗口
QZTC_cm_LeftHideQuickview()
Return
75E74C37-2F6F-47D7-A9C6-4104B1CF1033:
;通用_剪贴（Ctrl+X）
    sendinput,^x
Return
75ED0BBB-D941-4C0E-B039-607062CDBFA9:
;Excel_行-删除行-从当前行到底部
Excel_Row_DeleteFromCurrentToLast()
Return
7631E449-8FA9-49E9-8418-23D2BB7FFD52:
;TC_VIM:将TC标题栏字符串设置为空
TC_ClearTitle()
Return
76498E3A-78E1-4CAB-98D1-7609390B317D:
;微信文件按创建时间命名
MySel:=QZData("files")
loop,Parse,MySel,`n,`r
{
	MyTemFile:=A_LoopField
	FileAttrib:=FileExist(MyTemFile)
	IfInString,FileAttrib,D
		continue
	FileGetTime, FileTime ,%MyTemFile%,M
	SplitPath,MyTemFile,MyOutFileName,MyOutDir,MyOutExt,MyOutNameNoExt,MyOutDrive
	NameID:=0
	NewName:=""
	while 1
	{
		NewName=%MyOutDir%\微信导出-%FileTime%-%NameID%
		IfNotExist,%NewName%
			break
		NameID+=1
	}
	if (substr(NewName,-1)="-0")
		NewName:=substr(NewName,1,strlen(NewName)-2)
	NewName=%NewName%.%MyOutExt%
	filemove,%MyTemFile%,%NewName%
}
Return
765E2B22-50A3-4639-A45D-FFD876B79DB9:
;Excel_选择-区域-到当前区域边缘-上
Excel_Selection_AddRegion("上")
Return
76F8BCF8-BBDC-48FA-B8C0-E1E1397DB862:
;Phantom_文件-打印全部
sendinput,^p
sleep,300
sendinput,{enter}
Return
77411D4A-692B-4ACE-A26F-D7AEBDB9F07C:
;通用_确认（Enter）
sendinput,{Enter}
Return
775DD2C3-8955-4BB0-8422-02DAF33E4DD7:
;TC_标签:关闭所有标签
QZTC_cm_CloseAllTabs()
Return
776D15F6-716A-4C67-9FE7-779FFED2AFFD:
;&3  重命名 (输入内容)文件、文件夹名
InputBox, MyInsert, 提示,请输入要添加的内容
if (MyInsert="")
	return
MySel:=QZData("files")
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	SplitPath,MyTemFile,MyOutFileName,MyOutDir,MyOutExt,MyOutNameNoExt,MyOutDrive
	if InStr(FileExist(MyTemFile), "D")
	{
		MyNewFile =%MyOutDir%\%MyInsert%%MyOutNameNoExt%
		FileMoveDir,%MyTemFile%,%MyNewFile%
	} else {
		MyNewFile =%MyOutDir%\%MyInsert%%MyOutNameNoExt%.%MyOutExt%
		FileMove,%MyTemFile%,%MyNewFile%
	}
}
Return
7781FDA8-75D2-4C38-95D1-BC4E2DEFECFC:
;Excel_单元格-格式-日期(2017/01/01)
Excel_Format_Date("/")
Return
77B9FA6B-B255-4689-BDB4-5C3EA735936A:
;TC_右窗口:展开所有文件夹
QZTC_cm_RightDirBranch()
Return
786EB004-9080-406D-9219-582B4E6C5564:
;TC_选择:不选一组:仅文件
QZTC_cm_ClearFiles()
Return
78844689-99D4-4CF2-968D-C2D6FE001427:
;Excel_页面设置-在页脚中间设置[x/x]页码
Excel_PageSetup_SetFooter("C","&P/&N")
Return
7897BCDF-1615-4A20-A10C-DD1F28C122CB:
;Excel_工作表-切换到前个工作表（可循环）
Excel_Worksheet_SelectPrevious()
Return
78AA4F73-54FC-4BDA-A727-B2DED75BD411:
;Excel_其他-十字光标-启用
;---------------------------------------
;作用：十字光标显示
Excel_CursorCross(1)
Return
790F909E-6B41-42DF-929B-9010F5E096A1:
;TC_VIM:移动到窗口中间行
TC_Half()
Return
792A58D7-950F-452F-AB6F-7C466BBA3002:
;TC_FTP:续传
QZTC_cm_FtpResumeDownload()
Return
79D7E610-C2DE-4A6D-AE00-5696D6B50EB4:
;TC_切换到【search模式】
send,{esc}
vimd.changemode("search模式")
MsgBox, 0, 提示, 【search模式】, 0.3
Return
79ECA6D0-70D1-4829-B79E-E4987A820DED:
;TC_自定义列视图:右窗口:自定义列视图6
QZTC_cm_RightCustomView6()
Return
79F3E01D-6964-4C43-9C0C-36E91A68775B:
;Excel_其他-查找上一项
Excel_Find_NextOrPrevious("P")
Return
79FCC535-CE31-4035-97B2-794027D036D3:
;TC_配置:直接修改配置文件
QZTC_cm_ConfigChangeIniFiles()
Return
7A00994F-0068-4E7D-8394-632B279F6073:
;&B  删除BT种子
CurDir:=CustomFunc_getCurrentDir()
MyCmdLines=
(lefttrim
attrib -h "%CurDir%"\*.torrent
del /s "%CurDir%"\*.torrent
;del /s "%CurDir%"\*.mht
;del /s "%CurDir%"\*.htm
;del /s "%CurDir%"\*.txt
)
loop,Parse,MyCmdLines,`n,`r
{
	if (A_LoopField!="") && (substr(A_LoopField,1,1)!=";")
		;~ msgbox,%ComSpec% /c %A_LoopField%
		run,%ComSpec% /c %A_LoopField%
}
Return
7A7754C0-4391-4A5F-8974-416BD43C5F9C:
;TC_VIM:创建当前光标下文件的快捷方式并发送到启动文件里
TC_CreateFileShortcutToStartup()
Return
7AEAD0BB-40BC-4911-B541-A1F716E2863E:
;TC_选择:全部取消:仅文件
QZTC_cm_ClearAllFiles()
Return
7B0C1B7A-7BF7-4D4E-869F-93DA61BC11B2:
;TC_导航:后退(非FTP)
QZTC_cm_GotoPreviousLocalDir()
Return
7B19E395-4A65-4A52-AECA-D1DD1A39A49A:
;Excel_格式-对齐-水平-左对齐
Excel_Format_SetAlignment("水平","左对齐")
Return
7B303BBC-200F-4D95-8B47-1FFBDA66262A:
;TC_标签:新建标签(在另一窗口打开文件夹)
QZTC_cm_OpenDirInNewTabOther()
Return
7B5EBBC9-CBAF-4DFA-8859-0678E942A737:
;TC_剪贴板:复制文件名及完整路径
QZTC_cm_CopyFullNamesToClip()
Return
7BCEFF4B-09E6-4224-8F7F-DF976567E618:
;Word_插入-日期（2017.12.31）
Word_Insert_Date(".")
Return
7BFB8EAC-6937-44FD-84C6-A7FB814BAC18:
;通用_替换（Ctrl+H）
    sendinput,^h
Return
7C1EA71C-F340-4CDD-8396-29046D3D7D0F:
;TC_选择:不选扩展名相同的文件
QZTC_cm_UnselectCurrentExtension()
Return
7C2CACFA-18B0-48EA-AD2C-FBC0BF39B1C3:
;TC_视图:显示/隐藏:驱动器按钮
QZTC_cm_VisDriveButtons()
Return
7C31108D-F731-417E-9A5F-92F43CD24E27:
;PotPlayer_快进
sendinput,^{right}
Return
7C3C425F-B5AB-4ED0-AD36-E0CE63F1EFED:
;TC_右窗口:所有文件
QZTC_cm_RightAllFile()
Return
7C71D43C-5D28-4B97-93EA-4A5BB77B910F:
;TC_排序:来源窗口:按第1列排序
QZTC_cm_SrcSortByCol1()
Return
7CCA3DFB-D01E-4411-A3DD-B31977ACBE3B:
;TC_网络:显示本地文件的远程用户
QZTC_cm_ShowFileUser()
Return
7D069D86-43C3-424A-ADC9-D73533A835A0:
;TC_选择:选择扩展名相同的文件
QZTC_cm_SelectCurrentNameExt()
Return
7D29B1F5-A347-43EA-A11E-2835CBD430AB:
;TC_导航:后退
QZTC_cm_GotoPreviousDir()
Return
7D8DEA2E-7C54-4EA9-A884-A6E976AF12A7:
;TC_选择:导入选择列表(从文件)
QZTC_cm_LoadSelectionFromFile()
Return
7DA2074D-3ADA-474E-8E94-BD86710146E0:
;TC_VIM:预览文件时,光标自动移到对侧窗口里
TC_SrcQuickViewAndTab()
Return
7DB57F32-68D0-4A43-AA1F-9483FAE86C37:
;TC_视图:显示/隐藏:命令行
QZTC_cm_VisCmdLine()
Return
7DE98A8C-BEF1-44CA-8FE3-CBEC7351E73B:
;TC_工具:系统信息
QZTC_cm_SysInfo()
Return
7E1E702E-2469-4A5E-8AA4-613021B222E9:
;通用_PageUp
Send {PgUp}
Return
7E2BE037-78F2-47FD-8B4F-D9BF43006DF4:
;TC_剪贴板:剪切选中的文件到剪贴板
QZTC_cm_CutToClipboard()
Return
7E763908-B3C9-4E0A-A383-AFA1E376BB38:
;Excel_单元格-格式-日期(2017年01月01日)
Excel_Format_Date("z")
Return
7E8B9D1A-E0D1-44D1-A330-3916D6DA3C68:
;TC_右窗口:列表
QZTC_cm_RightShort()
Return
7F3442DF-8219-47E4-9FD5-241FF12B05BF:
;TC_导航:更改文件夹
QZTC_cm_CDtree()
Return
7FA4CF1A-40A9-45C8-9968-CD47EF6230AD:
;&X  迅雷下载此链接
MySelText:=QZData("{text}")
#WinActivateForce
MyRunPath:=QZData("%Thunder%")
run,%MyRunPath%,,Maximize
;sleep,2000
WinActivate,ahk_class XLUEFrameHostWnd
WinWaitActive, ahk_class XLUEFrameHostWnd, , 5
sendinput,^n
WinWaitActive, 新建任务, , 5
Clipboard:=MySelText
sendinput,^v
Return
7FC3BA5A-AEF6-4973-BB35-0D6829E94D53:
;Excel_单元格-填充-以右侧单元格值
Excel_Range_FillWith("右")
Return
804C2DD6-6201-4877-A48F-5F8F9EE5F504:
;TC_切换到【VIM模式】
send,{esc}
send,{esc}
vimd.changemode("VIM模式")
MsgBox, 0, 提示, 【VIM模式】, 0.3

Return
80948061-A8FC-4FF0-8A80-4557747EED93:
;TC_右窗口:只展开选中的文件夹
QZTC_cm_RightDirBranchSel()
Return
80B85DAD-1AEF-4C47-A212-08C14D0B671B:
;&D  Dos本目录
TempWinClass= % gMenuZ.Data.winclass ;将获取的class名赋值给用户变量
if TempWinClass=
	WinGetClass, TempWinClass, A
if % TempWinClass="ExploreWClass" or TempWinClass="CabinetWClass" ;如果当前激活窗口为资源管理器
{
	ControlGetText, AddressBarText, ToolbarWindow322,ahk_class %TempWinClass% ;通过地址栏获取路径
	stringreplace, AddressBarText, AddressBarText, 地址:%A_space%, , All
	if AddressBarText =
		ControlGetText, AddressBarText, Edit1,ahk_class %TempWinClass%
	if AddressBarText=桌面
		AddressBarText=%A_Desktop%
	if AddressBarText=库\文档
		AddressBarText=%A_MyDocuments%
	if AddressBarText=库\图片
		AddressBarText=%A_MyDocuments%\..\Pictures
	if AddressBarText=库\音乐
		AddressBarText=%A_MyDocuments%\..\Music
	if AddressBarText=库\视频
		AddressBarText=%A_MyDocuments%\..\Videos
	if AddressBarText=库\下载
		AddressBarText=%A_MyDocuments%\..\Downloads
	if AddressBarText=库\图片
		AddressBarText=%A_MyDocuments%\..\Pictures
	;~ if AddressBarText=计算机
		;~ AddressBarText:="::{20D04FE0-3AEA-1069-A2D8-08002B30309D}"
	;~ if AddressBarText=回收站
		;~ AddressBarText:="::{645FF040-5081-101B-9F08-00AA002F954E}"
	;~ if AddressBarText=网络
		;~ AddressBarText:="::{208D2C60-3AEA-1069-A2D7-08002B30309D}"
}
if % TempWinClass="WorkerW" or TempWinClass="Progman" ;如果当前激活窗口为桌面
{
	AddressBarText=%A_Desktop%
}
if % TempWinClass="Shell_TrayWnd" ;如果当前激活窗口为任务栏
{
	MsgBox 该操作不适用于任务栏
	Exit
}

if % TempWinClass="TTOTAL_CMD" ;如果当前激活窗口为TC
{
    ClipSaved := ClipboardAll   ; 把剪贴板的所有内容保存到您选择的变量中.
    ; ... 这里临时使用剪贴板, 例如使用 Transform Unicode 粘贴 Unicode 文本 ...
    PostMessage,1075,332,0,,ahk_class TTOTAL_CMD ;把焦点移到来源窗口的地址栏
    PostMessage,1075,2029,0,,ahk_class TTOTAL_CMD ;获取路径
    sleep 80
    AddressBarText= % Clipboard
    Clipboard := ClipSaved   ; 恢复剪贴板为原来的内容. 注意这里使用 Clipboard (不是 ClipboardAll).
    ClipSaved =   ; 在原来的剪贴板含大量内容时释放内存.
    if AddressBarText=\\我的文档
        AddressBarText=%A_MyDocuments%
    if AddressBarText=\\桌面
        AddressBarText=%A_Desktop%
    if AddressBarText=\\回收站
    {
        MsgBox 该操作不适用于回收站
        Exit
    }
}

if InStr(FileExist(AddressBarText), "D")
    Run cmd.exe /k chdir /d "%AddressBarText%"
else
    msgbox 路径错误
TempWinClass=
Return
Return
80BAF6A4-B0CC-485F-B7FC-8F76B8C0D50C:
;Excel_视图-缩小
Excel_Zoom("-10")
Return
80D4650E-B90C-412F-A141-50AAAC356ACF:
;TC_选择:不选一组:文件和/或文件夹(视配置而定
QZTC_cm_ClearSelCfg()
Return
81B0AC91-A91A-4BB5-B762-051FD94B5E19:
;TC_视图:两个独立文件夹树面板
QZTC_cm_SeparateTree2()
Return
83176ADC-433A-4BD2-9303-76DE509935E4:
;Excel_筛选-输入框
Excel_Filter_InputBox()
Return
8359B45B-22CA-4D2A-97F9-64D8ACB73E8A:
;&W  所选文本转到 Word 中编辑
clipboard := QZData("text")
MyAppPath:=QZData("%winword%")
run ,"%MyAppPath%"
sleep 2000
send {enter}
sleep 2000
send ^v
return
Return
84130D78-D286-42C6-8AD7-00982296E5CB:
;TC_左窗口:按大小排序
QZTC_cm_LeftBySize()
Return
84310D53-23A1-4E4A-90FB-8216880E22AE:
;Word_设置字号、行距、显示比例
Word_SetNNN()
Return
8451359F-896D-4612-9310-CD4FE81054F1:
;TC_视图:关闭独立文件夹树面板
QZTC_cm_SeparateTreeOff()
Return
845B5092-0B82-4ED0-843D-0AA875FF9011:
;TC_文件操作:验证校验和
QZTC_cm_CRCcheck()
Return
845EE560-A2CC-4284-8974-BAEA8796294C:
;TC_标签:右窗口:激活标签6
QZTC_cm_RightActivateTab6()
Return
84C030B7-D71B-44B5-A91E-B5CFD32ED25D:
;Excel_其他-调整所选行高h[n],列宽w[n],字号f[n]
Excel_SetNNN()
Return
84E27CC6-42E3-4BAC-BA3D-E477FE2B0AD0:
;TC_选择:导出详细信息(ANSI)
QZTC_cm_SaveDetailsToFileA()
Return
8530C1BA-DA04-4135-A135-FE8EB0D1DB8D:
;TC_文件操作:重命名当前文件
QZTC_cm_RenameSingleFile()
Return
855F29A6-3AAD-4ECE-B156-D26CAA39E5B8:
;Phantom_编辑-书签
MyDefault=%Clipboard%
;~ InputBox, OutputVar,提示,请输入书签名称, ,,,,,,,%MyDefault%
InputBox, OutputVar,提示,请输入书签名称
;~ if (OutputVar="")
	;~ return
;sendinput,!e
;sendinput,d
WinMenuSelectItem, A, , 编辑, 添加书签
NewStr=%MyDefault%%OutputVar%
sleep,300
send,%NewStr%
sleep,100
sendinput,{enter}

Return
858F307C-09CC-4838-9A02-015647404302:
;TC_配置:缩略图
QZTC_cm_ThumbnailsConfig()
Return
85998F1D-5EAF-49F3-B0DC-B0BEA4D54CDE:
;Excel_工作表-以当前单元格的值重命名工作表
Excel_Worksheet_Rename()
Return
85C8A0A0-D1C2-49BC-8E53-A58B07D3A4A0:
;TC_配置:图标
QZTC_cm_IconConfig()
Return
862C8D72-5B0D-4A6E-BB24-EEE16FA7FDE1:
;Word_插入-日期（2017年12月31日）
Word_Insert_Date("z")
Return
86528369-AE0C-435D-BCA9-F1D5A0FED4C5:
;TC_VIM:创建当前光标下文件的快捷方式并发送到桌面
TC_CreateFileShortcutToDesktop()
Return
8720A6A4-2F61-469D-9BE4-CDBCD4B77375:
;TC_复制到同一窗口
Postmessage, 1075, 3100, 0,, ahk_class TTOTAL_CMD
Return
87977B52-7A8F-46F4-A412-6A0E14619E88:
;通用_VIMD显示热键帮助
QZ_VIMD_ShowKeyHelp()
Return
87F44B1E-3DD4-4B02-8E3D-CBBC60982D22:
;TC_VIM:显示/隐藏按键提示
;TC_ToggleShowInfo()
Return
87F5E983-1E68-43B1-9F0B-9ADCD08A06E6:
;Excel_工作表-以当前单元格的值重命名工作表
Excel_Worksheet_Rename()
Return
884A3982-9EA9-490B-BE05-38CC07D1D7C4:
;TC_右窗口:详细信息
QZTC_cm_RightLong()
Return
8869462B-7451-4572-84A3-C86B08DDAE2B:
;TC_标签:目标窗口:激活标签7
QZTC_cm_TrgActivateTab7()
Return
887543D7-63B9-407F-ACDB-92090B5DF997:
;Word_宋体-微软雅黑
Word_setFontName("微软雅黑")
Return
890562B2-A68D-4DB7-BD56-CC899BCEF06C:
;TC_VIM:移动到[count]行
TC_GotoDefLine()
Return
891FDBEF-8A4D-4A18-885F-4B7E558C4475:
;TC_视图:显示文件提示
QZTC_cm_ShowHint()
Return
8A2B93F7-EB33-420C-8132-403699A0EABA:
;TC_自定义列视图:右窗口:上一个自定义视图
QZTC_cm_RightPrevCustomView()
Return
8A3762D4-1F93-4D3C-9C5C-4D7EC2050B2C:
;TC_标签:关闭当前标签
QZTC_cm_CloseCurrentTab()
Return
8A523D48-7352-46BB-A63C-CC1C7B9D1943:
;TC_选择: 全部选择:文件和文件夹
QZTC_cm_SelectAllBoth()
Return
8A54E2DC-D0BF-4A62-A7F4-06F626A39DA9:
;&2  重命名 2个文件交换文件名
MySel:=QZData("files")
ArrayCount=0
MyParentPath:=
loop,Parse,MySel,`n     ;循环读取每一行
{
	if A_index=1
		SplitPath,A_loopfield,,MyParentPath
	ArrayCount += 1  ;记录在数组中有多少个项目。
	Array%ArrayCount% := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	if ArrayCount=2
		break
}
if (ArrayCount!=2)
	return
SplitPath ,Array1,,,MyExt1,MyNameNoExt1
SplitPath ,Array2,,,MyExt2,MyNameNoExt2
MyTem=%MyParentPath%\Tem.%MyExt1%
MyNew1=%MyParentPath%\%MyNameNoExt2%.%MyExt1%
MyNew2=%MyParentPath%\%MyNameNoExt1%.%MyExt2%
FileMove,%Array1%,%MyTem%
FileMove,%Array2%,%MyNew2%
FileMove,%MyTem%,%MyNew1%
Return
8ABF8FB6-3115-4E8A-A204-144EC8DF8E04:
;TC_自定义列视图:右窗口:自定义列视图10
;QZTC_cm_RightCustomView10()
Return
8ADD292C-B4C0-4136-9B42-03A7FDC166BB:
;TC_选择:反向选择:仅文件夹
QZTC_cm_ExchangeSelFolders()
Return
8B41F263-A2B9-4622-8BDC-8325B26004F4:
;TC_来源窗口:列表
QZTC_cm_SrcShort()
Return
8BCD7DBC-DFE6-4AB4-9C5E-7048F1C8373C:
;TC_导航:控制面板
QZTC_cm_OpenControls()
Return
8CBFFB77-36C4-4BF3-8245-29094AAABD9D:
;Excel_单元格-编辑-在尾部输入
Excel_Range_Edit("E")
Return
8CF18744-7AA6-4C5A-A92A-623334BCA73A:
;TC_并口:直接电缆连接
QZTC_cm_DirectCableConnect()
Return
8D665693-9A5C-45B9-8703-3F2B82EC65A3:
;TC_选择:全部取消:文件和文件夹
QZTC_cm_ClearAll()
Return
8DFA0743-7054-420E-AE61-BEAAEB8F74A4:
;TC_导航:转到驱动器C
QZTC_cm_GotoDriveC()
Return
8DFD32CE-C41D-4149-AC58-3E3D001DB0A5:
;Excel_定位-到当前区域（右）单元格
Excel_Location_EdgeNextCell("右")
Return
8E5B052E-3C36-4826-83A1-A69B83721747:
;TC_来源窗口:打开驱动器列表
QZTC_cm_SrcOpenDrives()
Return
8E7CBB1D-FF86-4EC4-9EC3-2DD9D1555362:
;Word_字号-小四(12)
Word_setFontSize(12)
Return
8EAA7E6C-8E3D-4194-A033-306E19722D83:
;Excel_视图-打印预览
Excel_View_PrintPreView()
Return
8EAD514C-24C5-4DD5-A910-771428594548:
;TC_VIM:两个文件互换文件名
TC_TwoFileExchangeName()
Return
8EB25F7C-6924-4BBB-A68D-AF98EB97B86C:
;&T  所选文件保存到【D:\TempSave】文件夹
SavePath:="D:\TempSave\"
SaveText:=QZData("{text}")
CurDate=%a_yyyy%%a_mm%%a_dd%-
TxtName:=
MySaveName:=
loop,Parse,SaveText,`n     ;循环读取每一行
{
	TxtName := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	TxtName:=Trim(TxtName)
	StringReplace,TxtName,TxtName,`,,,all
	StringReplace,TxtName,TxtName,`\,,all
	StringReplace,TxtName,TxtName,`/,,all
	StringReplace,TxtName,TxtName,`:,,all
	StringReplace,TxtName,TxtName,`*,,all
	StringReplace,TxtName,TxtName,`?,,all
	StringReplace,TxtName,TxtName,`<,,all
	StringReplace,TxtName,TxtName,`>,,all
	StringReplace,TxtName,TxtName,`|,,all
	if TxtName!=
	{
		FirstLineLen:=StrLen(TxtName)
		if FirstLineLen>20
			TxtName:=SubStr(TxtName,1,20)
		break
	}
}
if (substr(SavePath,-1)!="\")
	SavePath=%SavePath%\
if SavePath!=
	MySaveName=%SavePath%%CurDate%%TxtName%`.txt
ifnotexist,%SavePath%
	FileCreateDir,%SavePath%
ifnotexist,%SavePath%
{
	MsgBox, 16, 错误提示, 保存目录：【%SavePath% 】不存在！`n`n【确认】后退出
	return
}
MyWF:=FileOpen(MySaveName,"rw")
if !IsObject(MyWF)
{
	MsgBox 不能打开写入 %MySaveName% 文件
	return
} else {
	MyWF.Write(SaveText)
	MyWF.Close()
}
Return
8EBCAB8D-004C-4683-B3F2-71D02FFD0E30:
;Word_大纲-目录升级(正文,9-1)
Word_setParagraphs_Promote()
Return
8EC6EDAE-B341-4E90-9D10-8C4FD06DA3D4:
;TC_导航:可自定义其他驱动器
QZTC_cm_GotoDriveF()
Return
8EF31234-F033-42BF-868C-8259D21AD082:
;Excel_页面设置-以当前单元格的值设置页眉中间
Excel_PageSetup_SetHeader("C","")
Return
90264147-BA30-4524-BB76-AC2239DCC337:
;TC_排序:来源窗口:按第5列排序
QZTC_cm_SrcSortByCol5()
Return
9086D974-C1E7-478C-9E56-1E133B457FBD:
;TC_解压缩到当前文件夹
;切换到英文输入法
dwLayout:=0x08040804
HKL:=DllCall("LoadKeyboardLayout", Str, dwLayout, UInt, 1)
ControlGetFocus,ctl,A
SendMessage,0x50,0,HKL,%ctl%,A
;解压
PostMessage, 1075, 509, 0,, ahk_class TTOTAL_CMD
 WinWaitActive, ahk_class TDLGUNZIPALL 
;sendinput,.{enter} 
sendraw,. 
sendinput,{Enter} 
Return
90ACBC8D-4D3F-4A42-B4AE-0307015E155A:
;Excel_格式-边框-内部垂直方向-实线
Excel_Format_SetBonder("内部垂直","实线","细")
Return
90DE9163-95BC-46F4-93C8-0E58E9EE0B27:
;TC_标签:目标窗口:激活标签3
QZTC_cm_TrgActivateTab3()
Return
90E037E3-BDB9-4593-916D-FE2724D37E36:
;TC_VIM:向下选择
TC_DownSelect()
Return
91079104-D96A-408F-8869-076D1A864935:
;TC_左窗口:快速查看
QZTC_cm_LeftQuickview()
Return
910AA526-83FF-4FDA-812F-FC4AEA12D7CA:
;Excel_筛选-与所选单元格前1-5个字符相同
Excel_Filter_EqualAsFront(5)
Return
910FBF4C-24B4-4A4A-9D89-D946914125F5:
;TC_标签:左窗口:激活标签9
QZTC_cm_LeftActivateTab9()
Return
911D79E0-D814-4075-A05C-BDD9607AFCC0:
;TC_自定义列视图:左窗口:自定义列视图1
QZTC_cm_LeftCustomView1()
Return
9135D661-2511-4AB7-81E6-8E45063971FE:
;Excel_文件-不保存关闭
send,!{f4}
sleep,400
send,n
Return
922E8562-664A-4CEF-BECB-EE8FAB0E87D4:
;Phantom_编辑-批量添加书签
global CurID
global PageStr
while (CurID>0)
{
	NewStr:=PageStr[CurID]
	if (NewStr="")
		break
	MsgBox, 3, 提示, 标签内容为：%NewStr%`n`n确认请按【Yes】，前一个标签【No】，退出【Cancel】
	IfMsgBox Yes
	{
		;sendinput,!e
		;sendinput,d
WinMenuSelectItem, A, , 编辑, 添加书签
		sleep,300
		sendinput,%NewStr%
		sleep,100
		sendinput,{enter}
		sleep,100
		CurID+=1
		mouseclick,,500,500
		sleep,300
		sendinput,{PgDn}
		continue
	}	
	IfMsgBox no
	{
		CurID-=1
		if (CurID=0)
			CurID=1
		continue
	}
	IfMsgBox Cancel
		break
}
Return
924F7F5C-914D-4984-9B5A-B996218F5679:
;TC_选择:全部取消:仅文件夹
QZTC_cm_ClearAllFolders()
Return
92C6B63A-3976-4E2E-8C69-E039FEC8F440:
;Excel_剪切板-选择性粘贴
Excel_Cliboard_PasteSelcet()
Return
92E5D333-42DF-4BA5-9B5B-47B25FC1C91A:
;Word_段落行距-3.5倍(3.5)
Word_setLineSpacing(3.5)
Return
93760758-A17E-462F-92B9-36329DE8217E:
;TC_窗口:缩略图
QZTC_cm_LeftThumbs()
Return
93994EDE-AB76-484E-BF78-A76E312E5466:
;TC_导航:光标移到列表中的第一个文件
QZTC_cm_GoToFirstFile()
Return
9414FD25-AAA5-4732-9D9D-34582FE8847F:
;Word_大纲-1级目录
Word_setParagraphs_Style(1)
Return
941DEDE3-AAF0-4346-AC9C-A6BA1391660E:
;TC_文件操作:测试压缩包
QZTC_cm_TestArchive()
Return
945F4B1A-376D-412B-8C7C-2EE7EA3369DB:
;TC_工具:定义内部关联
QZTC_cm_InternalAssociate()
Return
94620889-F420-44C8-8DF1-09A4374857C5:
;&H  添加分隔符合并行
MySel:=QZData("{text}")
Curhwnd:=QZData("hWnd")
InputBox,MyTemInput,请输入搜索内容,,,200,100
if ErrorLevel
	return
MsgBox, 36, 提示, 是否自动删除空白行？
IfMsgBox,Yes
	DelEmptyLine:=1
else
	DelEmptyLine:=0
MsgBox, 36, 提示, 是否自动删除格？
IfMsgBox,Yes
	MyAutoTrim:=1
else
	MyAutoTrim:=0
Aligned:=""
loop, Parse, MySel, `n,`r                   ;首先求得左边最长的长度，以便向它看齐
{
	if DelEmptyLine
	{
		if (A_loopfield="")
			continue
	}
	if MyAutoTrim
		Aligned .= MyTemInput trim(A_loopfield) 
	else
		Aligned .= MyTemInput A_loopfield
}
if(MyTemInput!="")
	Aligned:=substr(Aligned,2)   ;删除最前面的分隔符
Aligned:=RegExReplace(Aligned,"\s*$","")   ;删除最后的空白行，可根据需求注释掉
clipboard := Aligned
WinActivate,Ahk_ID %Curhwnd%
sleep,100
Send,^{vk56}
Return
948649CA-2255-46EB-B2EF-D94757027862:
;Excel_格式-边框-四周双线
 Excel_Format_SetBonder("四周","双线","粗")
Return
94B51484-9BE2-4374-A036-83A8F4E3BEE9:
;Excel_定位-到当前区域（左）单元格
Excel_Location_EdgeNextCell("左")
Return
94E07B38-6C44-4F93-B258-5FC7064B8862:
;&F  分辨率1080P
WinMove, A, , 70, 0, 1850, 1080
return
Return
9526021C-E887-44E2-A158-962E67EF9EFF:
;TC_导航:打开光标处的文件夹或压缩包
QZTC_cm_GoToDir()
Return
95318607-7CCF-4289-BD00-0BBF3F29AB45:
;TC_标签:交换左右窗口及其标签
QZTC_cm_ExchangeWithTabs()
Return
957DF8BB-E951-479F-913F-4E959B4D4220:
;Word_字号-七号(5)
Word_setFontSize(5)
Return
95A7AE17-612A-40DD-89F2-70E910794501:
;Excel_页面设置-纸张纵向
Excel_PageSetup_SetOrientation("纵向")
Return
95FBEF45-30DB-4B56-9364-99670F5E8931:
;TC_其他:目标=来源
QZTC_cm_MatchSrc()
Return
9609396D-4E20-42FF-B5B9-0CCA5E676C4F:
;Excel_视图-放大
Excel_Zoom("+5")
Return
961E4717-6585-4F5C-8AC2-905EEFE6C5C5:
;TC_其他:显示快捷菜单(内部关联)
QZTC_cm_ContextMenuInternal()
Return
9650ABF0-A86D-41F3-B98D-F4B05D0E0CE8:
;Word_两端对齐
Word_setAlignment("J")
Return
966BD70D-C1E2-42C5-B24F-EEDC4FE3685B:
;TC_配置:复制/删除
QZTC_cm_CopyConfig()
Return
9681D070-370D-4B35-9373-9F03F0D9D093:
;Excel_筛选-数值相等（=）的单元格
Excel_Filter_Equal()
Return
970347AB-106F-40ED-996A-E547EEB34A81:
;Excel_视图-显示/不显示自动分页线
Excel_View_DisplayAutomaticPageBreaks()
Return
9772AD67-8DF6-4A1F-98CC-BDEA5EE5670F:
;TC_右窗口:自定义视图菜单
QZTC_cm_RightCustomViewMen()
Return
979DB0B3-2A2D-43DF-AB2C-381E435FEC55:
;TC_排序:目标窗口:按第4列排序
QZTC_cm_TrgSortByCol4()
Return
9809B9DF-3EB5-498D-A9AD-58E8A76F8430:
;TC_VIM:切换当前（纵向）窗口显示状态50%-100%
TC_Toggle_50_100Percent_V()
Return
982D910D-BC60-4FAD-8CB9-825B2F6D1514:
;Excel_页面设置-以当前单元格的值设置页眉左侧
Excel_PageSetup_SetHeader("L","")
Return
983B0269-744F-492B-BD2F-676FAADEADA3:
;Phantom_页面管理-旋转-当前页-顺90
;sendinput,!o
;sendinput,t
WinMenuSelectItem, A, , 页面管理, 旋转页面
controlclick,combobox1,,旋转页面,,
sendinput,{down}
sendinput,{enter}
controlclick,Button7,,旋转页面,,
Return
992E95B5-D3F8-494C-9B48-3B1B989EBC25:
;Excel_其他-格式刷
Excel_FormatBrush()
Return
99B9FE20-6C5F-4EB4-982A-A1038E8544B5:
;通用_向右
sendinput,{right}
Return
99E5E71F-D88B-4553-916B-38E79717D909:
;Excel_筛选-与所选单元格后1-3个字符相同
Excel_Filter_EqualAsBehind(3)
Return
99F79CDB-654A-4B08-BA44-D966CA4A49BF:
;TC_选择:保存选择列表
QZTC_cm_SaveSelection()
Return
9A114C18-B742-49E4-A426-EEA446041B0D:
;回到行前并切换模式
Send {Home}
vimd.changemode("普通模式")
Return
9A11A722-5F0D-474D-8F19-EBFF30A4A1B7:
;Excel_筛选-显示筛选对话框
Excel_Filter_ShowDialog()
Return
9A2412F6-2D98-4879-B045-9FE1DC52DDE5:
;&D  等号对齐
MySel:=QZData("{text}")
Curhwnd:=QZData("hWnd")
LimitMax:=90     ;左侧超过该长度时，该行不参与对齐，该数字可自行修改
MaxLen:=0
StrSpace:=" "
loop,% LimitMax+1
	StrSpace .=" "
Aligned:=
loop, Parse, MySel, `n,`r                   ;首先求得左边最长的长度，以便向它看齐
{
	IfNotInString,A_loopfield,=              ;本行没有等号，过
		continue
	ItemLeft :=RegExReplace(A_LoopField,"\s*(.*?)\s*=.*$","$1")        ;本条目的 等号 左侧部分
	ThisLen:=StrLen(RegExReplace(ItemLeft,"[^\x00-\xff]","11"))       ;本条左侧的长度
	MaxLen:=( ThisLen > MaxLen And ThisLen <= LimitMax) ? ThisLen : MaxLen       ;得到小于LimitMax内的最大的长度，这个是最终长度
}
loop, Parse, MySel, `n,`r
{
	IfNotInString,A_loopfield,=
	{
		Aligned .= A_loopfield "`r`n"
		continue
	}
	ItemLeft:=Trim(RegExReplace(A_LoopField,"\s*=.*?$") )        ;本条目的 等号 左侧部分
	ItemRight:=Trim(RegExReplace(A_LoopField,"^.*?=")  )          ;本条目的 等号 右侧部分
	ThisLen:=StrLen(RegExReplace(ItemLeft,"[^\x00-\xff]","11"))   ;本条左侧的长度
	if ( ThisLen> MaxLen )       ;如果本条左侧大于最大长度，注意是最大长度，而不是LimitMax，则不参与对齐
	{
		Aligned .= ItemLeft  "= " ItemRight "`r`n"
		continue
	}
	else
	{
		Aligned .= ItemLeft . SubStr( StrSpace, 1, MaxLen+2-ThisLen ) "= " ItemRight "`r`n"        ;该处给右侧等号后添加了一个空格，根据需求可删
	}
}
Aligned:=RegExReplace(Aligned,"\s*$","")   ;顺便删除最后的空白行，可根据需求注释掉
clipboard := Aligned
WinActivate,Ahk_ID %Curhwnd%
sleep,100
Send,^{vk56}
Return
9A298C4A-40AD-4629-AB9F-7DC87AB211D2:
;TC_用户:用户菜单8
QZTC_cm_UserMenu8()
Return
9A3D4258-AF64-4008-AA87-30383C6A5108:
;&0  重命名 修改后缀为(输入内容)
MySel:=QZData("files")
InputBox, MyNewExt, 提示,请输入新的后缀名
if (MyNewExt="")
	return
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	if InStr(FileExist(MyTemFile), "D")
		continue
	SplitPath,MyTemFile,MyOutFileName,MyOutDir,MyOutExt,MyOutNameNoExt,MyOutDrive
	MyNewFile =%MyOutDir%\%MyOutNameNoExt%.%MyNewExt%
	FileMove,%MyTemFile%,%MyNewFile%
}
Return
9A3FAA32-F530-43B7-815F-164260871FC4:
;TC_标签:目标窗口:激活标签4
QZTC_cm_TrgActivateTab4()
Return
9A5A9DEB-57A3-4871-9394-E3C7DCAF4724:
;IE Window Element Spy (&I)
Run "%A_AhkPath%" "\QuickZ\Apps\AutoHotkey\IE_Window_Element_Spy.ahk"
Return
9A8B8790-50A6-4A9C-81F4-48FD3F142C8B:
;TC_自定义列视图:来源窗口:自定义列视图10
;QZTC_cm_SrcCustomView10()
Return
9A994287-6910-4316-A27B-8A8CD7694577:
;TC_选择:反向选择:仅文件
QZTC_cm_ExchangeSelFiles()
Return
9AA98D94-A5F9-4C85-856E-DD3945C1D6B8:
;Phantom_视图-逆时针-全部
send ^+-
Return
9B2D235C-A223-4A96-AFAE-2B592A1D2F92:
;TC_选择:选择文件名相同的文件
QZTC_cm_SelectCurrentName()
Return
9B89A524-2F51-4C0A-9903-208CA0ABEAA8:
;TC_配置:隐藏文件
QZTC_cm_IgnoreConfig()
Return
9B8C25C5-96B6-452E-98F7-41FD178D69AB:
;Excel_格式-自动换行
Excel_Format_WrapText()
Return
9B91D8CF-04DC-47D5-9C39-B5CF84C512EA:
;Excel_切换到【普通模式】
send,{esc}
vimd.changemode("普通模式")
MsgBox, 0, 提示, 【普通模式】, 0.3
;excel:=Excel_Get()
;excel.statusBar:=black
Return
9B9C2180-D539-4D11-95BF-406F4605F677:
;TC_VIM:强制删除
TC_ForceDelete()
Return
9BA68DAB-912E-4C47-8F08-D17291D184AC:
;TC_标签:左窗口:激活标签1
QZTC_cm_LeftActivateTab1()
Return
9BAFED5F-4E69-4DA5-A050-3964D41D871E:
;QQ浏览器_关闭标签
sendinput,^w
Return
9C081E59-8DF0-4276-8915-C0EBF58FE468:
;TC_标签:右窗口:激活标签8
QZTC_cm_RightActivateTab8()
Return
9C371A4D-0130-4FDD-AE2B-75DB2D0603A7:
;TC_导航:文件夹历史记录
QZTC_cm_DirectoryHistory()
Return
9CBE0BED-0033-41F0-BB73-2401D19A5C98:
;Excel_单元格-格式-文本
Excel_Format_Text()
Return
9D0712F1-072F-46AC-B3AC-E76D20678AEC:
;TC_FTP:添加到下载列表
QZTC_cm_FtpAddToList()
Return
9D59781D-5F69-4EF9-99BB-80A60775A89C:
;Excel_列-删除列-从当前列到右侧尾部
Excel_Column_DeleteFromCurrentToLast()
Return
9DB638CC-A646-48F3-AB47-4DBEA5607BF0:
;Word_大纲-7级目录
Word_setParagraphs_Style(7)
Return
9E89544E-BB55-4297-A622-119EBA405D93:
;TC_窗口:恢复正常大小
QZTC_cm_Restore()
Return
9EBC671A-A830-4A69-94DC-56C9A8EE2548:
;TC_文件操作:以其他用户身份运行光标处的程序
QZTC_cm_OpenAsUser()
Return
9EC46753-E560-45F4-8805-4C1E4C43F0DA:
;TC_右窗口:上次选中的文件
QZTC_cm_RightUserSpe()
Return
9EE8EDB1-7CD5-4EB8-A040-3FE2D5514B93:
;TC_用户:用户菜单3
QZTC_cm_UserMenu3()
Return
9F0AAE00-85CD-40DE-9CE9-97A8A8A0C167:
;TC_排序:来源窗口:按第8列排序
QZTC_cm_SrcSortByCol8()
Return
9F61363B-7D05-4CBE-95C5-B6174B90A8A9:
;通用_保存（Ctrl+S）
sendinput,^s
Return
9FE35273-B289-4D65-B046-5EFCA23A76F9:
;TC_用户:用户菜单9
QZTC_cm_UserMenu9()
Return
A11475FD-146C-476E-8FFF-571416E723EB:
;TC_VIM:将光标所在的文件内容中的文件夹在新标签页依次打开
TC_OpenDirsInFile()
Return
A26A7B63-B9E5-44F8-8812-42B13A596C04:
;Excel_选择-单元格-向上添加
Excel_Selection_AddRange("上")
Return
A2768B2E-8664-4CAB-9C07-73A3A469C224:
;TC_排序:来源窗口:按第9列排序
QZTC_cm_SrcSortByCol9()
Return
A2EADC11-5324-4F17-A8B4-4611773A58C7:
;TC_来源窗口:关闭快速查看窗口
QZTC_cm_SrcHideQuickview()
Return
A37BD4E6-F7DC-4559-BA67-C01561F80716:
;TC_VIM:将当前光标下的文件复制一份作为作为备份
TC_FileCopyForBak()
Return
A3853FBE-F217-4707-B0BB-B01B2E7722C2:
;TC_自定义列视图:左窗口:自定义列视图7
QZTC_cm_LeftCustomView7()
Return
A44C9366-C252-40F7-A11E-B6446BB06065:
;TC_标签:来源窗口:激活标签4
QZTC_cm_SrcActivateTab4()
Return
A455CD76-E34E-46BD-8723-E857EDB3BFA8:
;TC_排序:左窗口:按第6列排序
QZTC_cm_LeftSortByCol6()
Return
A45FDB07-EB2C-42DF-AA9C-9748FB3A83FC:
;TC_标签:右窗口:激活标签5
QZTC_cm_RightActivateTab5()
Return
A47D58B3-A9ED-42EF-A42C-C6C2F4EB3B50:
;PotPlayer_切换到【普通模式】
vimd.changemode("普通模式")
MsgBox, 0, 提示, 【普通模式】, 0.3
Return
A483EA42-E24B-4D1D-9EE8-C73D58BAD2A7:
;TC_自定义列视图:仅选中的文件按需加载备注
QZTC_cm_LoadSelOnDemandFields()
Return
A4A9E12B-1204-4867-976C-0C262EF84DA4:
;TC_标签:来源窗口:激活标签2
QZTC_cm_SrcActivateTab2()
Return
A4D6F5E4-8C42-424C-B329-D82D551D9727:
;TC_FTP:显示隐藏的FTP文件
QZTC_cm_FtpHiddenFiles()
Return
A4DBF756-34AC-482B-AA09-56831C903C63:
;Excel_文件-打开Excel文件
Excel_OpenFile()
Return
A510B6BA-A6EF-44B3-99E5-2E5427E587BC:
;TC_排序:左窗口:按第10列排序
;QZTC_cm_LeftSortByCol10()
Return
A5A2E337-6F27-42B6-BE29-A5A4880766E5:
;TC_来源窗口:焦点置于路径上
QZTC_cm_SrcPathFocus()
Return
A62AF1F4-190B-494B-95E9-9C8057BFC3E8:
;TC_工具:搜索文件
QZTC_cm_SearchFor()
Return
A6571EEE-AD40-4D8B-B088-F99AD5100076:
;TC_其他:比较文件夹
QZTC_cm_CompareDirs()
Return
A6660A2B-505E-40DE-BAEB-3A6BAF846FF2:
;&J  所选文本转到 Notepad++ 中编辑
AppPath:=QZData("%NotePadJJ%")
clipboard:=QZData("{Text}" )
ifnotexist,%AppPath%
	return
IfWinNotExist	ahk_class Notepad`+`+	;如果SciTE4没有打开
{
	Run,%AppPath%,,Max
	WinWait,ahk_class Notepad`+`+,,5
	if ErrorLevel		;如果5秒没激活，则退出
		return
	WinActivate
sendinput,^n
	sleep,300
	send,^{vk56}
}
IfWinNotActive ahk_class Notepad`+`+
{
	Run,%AppPath%,,Max
	WinWait,ahk_class Notepad`+`+,,5
	if ErrorLevel			;如果5秒没激活，则退出
		return
	WinActivate
	sendinput,^n
	sleep,300
	send,^{vk56}
}
clipboard:=
Return
A6979129-B37D-4261-9EC3-C6D59F2AB32C:
;TC_视图:开启/关闭:隐藏或系统文件显示
QZTC_cm_SwitchHidSys()
Return
A6DF72AD-ABAB-4AB5-8618-F9F8C538BF19:
;TC_选择:全部选择:文件和文件夹
QZTC_cm_SelectAllBoth()
Return
A714AB64-F142-489A-89C9-3895F601A2D0:
;Word_字号-五号(10)
Word_setFontSize(10)
Return
A7266C03-39F2-4501-A4EB-6669B37ACF51:
;通用_向上
sendinput,{up}
Return
A77381D5-648A-4B6C-84AB-69F34F483A77:
;TC_来源窗口:文件夹树
QZTC_cm_SrcTree()
Return
A7B96A78-6C5B-45BA-807A-172F10EEABA1:
;Word_字号-小二(18)
Word_setFontSize(18)
Return
A7BEA60A-8860-4223-A5A9-3A2C466211A0:
;TC_自定义列视图:右窗口:自定义列视图7
QZTC_cm_RightCustomView7()
Return
A855C7A8-19B3-47DE-ABF4-F7889D661712:
;Excel_筛选-重置所有列
Excel_Filter_ResetAllColumns()
Return
A862677F-6AE3-4D28-B1F9-3210AF155912:
;Excel_单元格-编辑-替换输入
Excel_Range_Edit("R")
Return
A875F202-C1A0-4397-AD5B-9A88B652C670:
;Phantom_切换到右边标签
sendinput,^{tab}
Return
A8B1F3FC-853C-4150-AE4A-6C5334EF994F:
;TC_排序:右窗口:按第3列排序
QZTC_cm_RightSortByCol3()
Return
A9005922-C3AB-453F-B50A-5C9567564211:
;Word_批处理格式文档3
;Word_VIMD批处理使用示例
;不想设置的内容，直接在行前添加【;】，注释当前行即可
 ---------------------------------------------------------------------------------------
;设置字号
;42=初号，36=小初，26=一号，24=小一，22=二号，18=小二,16=三号，15=小三，14=四号，12=小四，10=五号，9=小五,7=六号，6=小六，5=七号，5=八号
Word_setFontSize(10)

;设置字体
;宋体，黑体，仿宋，微软雅黑
Word_setFontName("宋体")

;设置字体、高亮颜色
;高亮颜色，ra=自动，rb=蓝色，rB=浅蓝，rg=绿色，rG=浅绿，r1=灰1，r2=灰2，r3=灰3，r4=灰4，rk=黑色，rn=无，ro=橙色，rO=浅橙，rr=红色，rR=浅红，rw=白色，ry=黄色，rY=浅黄
Word_setColor("ry")
;字体颜色，ta=自动，tb=蓝色，tB=浅蓝，tg=绿色，tG=浅绿，t1=灰1，t2=灰2，t3=灰3，t4=灰4，tk=黑色，to=橙色，tO=浅橙，tr=红色，tR=浅红，tw=白色，ty=黄色，tY=浅黄
Word_setColor("tr")

;设置对齐
;对齐格式，L=左对齐，C=居中，R=右对齐，J=两端对齐，D=分散对齐
Word_setAlignment("L")

;设置粗体
Word_setBold()
;设置斜体
Word_setItalic()
;设置下划线
Word_setUnderline()
;设置删除线
Word_setStrikeThrough()

;设置行间距
;1,5=1.5倍行距
Word_setLineSpacing(1.5)
;设置段前段后0行，（段前行数，段后行数，1=自动|0=0行）
Word_setParagraphs_Space(0,0,0)

;设置首行缩进
;两字符=0.35
Word_setFirstLineIndent(0.35)

;设置页边距
;(上边距，下边距，左边距，右边距，页眉边距，页脚边距）
Word_PageSetup_Margin(1,1,1,1,0.5,0.5)

;设置纸张方面
;自动转换
Word_PageSetup_Orientation()
Return
A932185E-D0D1-4BC1-A7BD-729010A7A226:
;Word_批处理格式文档1
;Word_VIMD批处理使用示例
;不想设置的内容，直接在行前添加【;】，注释当前行即可
 ------------------------------------------------------------------------
;设置字号
;42=初号，36=小初，26=一号，24=小一，22=二号，18=小二,16=三号，15=小三，14=四号，12=小四，10=五号，9=小五,7=六号，6=小六，5=七号，5=八号
Word_setFontSize(22)

;设置字体
;宋体，黑体，仿宋，微软雅黑
Word_setFontName("宋体")

;设置字体、高亮颜色
;高亮颜色，ra=自动，rb=蓝色，rB=浅蓝，rg=绿色，rG=浅绿，r1=灰1，r2=灰2，r3=灰3，r4=灰4，rk=黑色，rn=无，ro=橙色，rO=浅橙，rr=红色，rR=浅红，rw=白色，ry=黄色，rY=浅黄
;Word_setColor("ry")
;字体颜色，ta=自动，tb=蓝色，tB=浅蓝，tg=绿色，tG=浅绿，t1=灰1，t2=灰2，t3=灰3，t4=灰4，tk=黑色，to=橙色，tO=浅橙，tr=红色，tR=浅红，tw=白色，ty=黄色，tY=浅黄
;Word_setColor("tr")

;设置对齐
;对齐格式，L=左对齐，C=居中，R=右对齐，J=两端对齐，D=分散对齐
Word_setAlignment("C")

;设置粗体
Word_setBold()
;设置斜体
;Word_setItalic()
;设置下划线
;Word_setUnderline()
;设置删除线
;Word_setStrikeThrough()

;设置行间距
;1,5=1.5倍行距
Word_setLineSpacing(1.5)
;设置段前段后0行，（段前行数，段后行数，1=自动|0=0行）
Word_setParagraphs_Space(0,0,0)

;设置首行缩进
;两字符=0.35
;Word_setFirstLineIndent(0.35)

;设置页边距
;(上边距，下边距，左边距，右边距，页眉边距，页脚边距）
;Word_PageSetup_Margin(1,1,1,1,0.5,0.5)

;设置纸张方面
;自动转换
;Word_PageSetup_Orientation()
Return
A9531C22-913B-4EC9-9E2B-CA6A73CE98B3:
;Excel_格式-小数点2位
Excel_Format_SetDecimalNum(2)
Return
A97A0C07-FA9D-4153-B525-EAA3D521D39C:
;TC_右窗口:焦点置于路径上
QZTC_cm_RightPathFocu()
Return
A99A4DBA-9449-42FE-8952-F82622CE1D4E:
;TC_配置:显示
QZTC_cm_DisplayConfig()
Return
A9E4AC08-425C-4EF1-B5D4-43531302173E:
;&A  添加QQ好友
clipboard := QZData("text")
;If ! (RegExMatch(Clipboard,"^[0-9]{5,11}$"))  ;限定qq的位数为5--11位
;return
;else
run tencent://AddContact/?fromId=50&fromSubId=1&subcmd=all&uin=%Clipboard%  ;没有指定那个qq加好友
WinWait,添加好友 ahk_class TXGuiFoundation,,0.5
WinActivate  添加好友 ahk_class TXGuiFoundation
ControlClick,x222   y96,添加好友 ahk_class TXGuiFoundation             ;坐标为相对活动窗口所在的坐标，不会移动鼠标
return
Return
AA13E42C-0EC6-4874-9319-625B791B1EBD:
;TC_标签:右窗口:激活标签7
QZTC_cm_RightActivateTab7()
Return
AA155BB6-EBAC-4243-8BAA-3362664BFB25:
;TC_帮助:注册信息
QZTC_cm_Register()
Return
AA3EEF50-40CD-4818-BCB5-0C10EE15BD21:
;Excel_定位-到当前区域（上）单元格
Excel_Location_EdgeNextCell("上")
Return
AA3F3EE8-9FA2-45FB-8A5D-841A69DEA840:
;Excel_筛选-数值大于等于（>=）的单元格
Excel_Filter_EqualOrGreater()
Return
AA88B0AD-6FBF-49FA-91A6-C9C96C49B2D0:
;TC_标签:锁定/解锁当前标签(可更改文件夹)
QZTC_cm_ToggleLockDcaCurrentTab()
Return
AAE55630-0ED7-46F3-AB85-99E634A089C4:
;TC_VIM:最大化右侧/下部窗口
TC_WinMaxRight()
Return
AB960648-21F7-4BF8-8C65-7E5DBCF13F4D:
;TC_VIM:标记功能
TC_Mark()
Return
AC457E87-C0B5-446E-85F5-588095953990:
;Word_插入-表格
Word_Dialogs_Insert_Table()
Return
AC9571E9-984F-43F6-A0A6-EFD435DA64C5:
;TC_导航:在右窗口打开光标处的文件夹或压缩包
QZTC_cm_TransferRight()
Return
AC9D34A2-43B2-4879-AFA4-C924A0022A20:
;Excel_工作表-选择最后一个工作表
Excel_Worksheet_Select("E")
Return
ACED0560-492F-4AA5-95AA-02E5A05C1A42:
;Excel_筛选-空单元格
Excel_Filter_Empty()
Return
ADAA2440-7C59-41C0-AEC4-A0DB42F0C7B9:
;TC_配置:保存位置
QZTC_cm_ConfigSavePos()
Return
ADD044B1-2E6C-44DC-971D-95FA2D88F42A:
;TC_标签:右窗口:激活标签2
QZTC_cm_RightActivateTab2()
Return
ADF0279D-1CEB-4549-99D6-A3941B297117:
;TC_标签:右窗口:激活标签10
;QZTC_cm_RightActivateTab10()
Return
AE462037-42B7-4BC2-938A-8E317F4A557B:
;TC_右窗口:快速查看
QZTC_cm_RightQuickvie()
Return
AE64DC66-966F-4EBD-AD4A-179653B490C8:
;Excel_格式-对齐-垂直-靠上
Excel_Format_SetAlignment("垂直","靠上")
Return
AEADCCF1-9343-4CBB-BF63-94DF9508671E:
;PotPlayer_切换到【VIM模式】
vimd.changemode("VIM模式")
MsgBox, 0, 提示, 【VIM模式】, 0.3
Return
AEE6FE57-95C1-4007-928C-626991579B80:
;TC_选择:不选同一路径下的文件(展开文件夹+搜索文件)
QZTC_cm_UnselectCurrentPath()
Return
AF066E17-29E1-428F-8398-B9C9607AE7C0:
;TC_安全:审核文件(NTFS)
QZTC_cm_EditAuditInfo()
Return
AF3FDAEC-ADA5-4FDE-8491-4954BC296890:
;TC_文件操作:移动到另一个窗口(F6)
QZTC_cm_MoveOnly()
Return
AF487482-C3E4-43DD-9BA9-8F515EBB32DA:
;TC_视图:切换:平坦/立体用户界面
QZTC_cm_VisFlatInterface()
Return
AF7FF475-F8E7-4C76-BC48-1B165F26065B:
;TC_排序:右窗口:按第1列排序
QZTC_cm_RightSortByCol1()
Return
AF8EB567-F871-437F-AEC1-511F972E96C0:
;TC_左窗口:按文件名排序
QZTC_cm_LeftByName()
Return
AF97A2DA-D58A-45CC-ABC5-01EBC1A7FEC4:
;TC_排序:左窗口:按第5列排序
QZTC_cm_LeftSortByCol5()
Return
AFB6DCED-F7EF-4C59-8A47-FE4F484AB591:
;TC_工具:使用内部比较程序
QZTC_cm_IntCompareFilesByContent()
Return
B05C6B61-89B7-496B-BCDB-0287393840E4:
;TC_自定义列视图:目标窗口:下一个自定义视图
QZTC_cm_TrgNextCustomView()
Return
B060E75A-AE2F-445E-86B8-84AFEA130D01:
;TC_标签:左窗口:激活标签2
QZTC_cm_LeftActivateTab2()
Return
B072A833-BAEE-473A-BAE9-170B945FB265:
;TC_左窗口:按日期时间排序
QZTC_cm_LeftByDateTime()
Return
B0A323AE-66A6-4786-BACF-EFD02F3DFF7A:
;&C  查询快递
MsgBox % 查快递(QZData("text"))
return
; By run QQ：1324424600

查快递(id){
;~ 200382770316   圆通
;~ 9890520041154 邮政国内
;~ 409173423798  中通
url := "https://www.kuaidi100.com/autonumber/autoComNum?text="	id	 ;post发送contents内容notepad.cc里面
快递公司:=json_toobj(URLDownloadToVar(url,"utf-8","POST")	)

;MsgBox % 快递公司.auto[1].comcode

xingcheng_url:="https://www.kuaidi100.com/query?type=" 快递公司.auto[1].comcode "&postid=" id "&id=1"
;~ MsgBox % neirong.auto[1].comcode
;~ xingcheng:=json_toobj(URLDownloadToVar(xingcheng_url,"utf-8","POST"))
while !URLDownloadToVar(xingcheng_url,"utf-8","POST")
	sleep 1000
xingcheng:=json_toobj(URLDownloadToVar(xingcheng_url,"utf-8","POST"))
for k , v in xingcheng.data
	行程.=v.time "`t" . v.context "`n"
return 行程
}




URLDownloadToVar(url, Encoding = "",Method="GET",postData=""){ ;网址，编码,请求方式，post数据
    hObject:=ComObjCreate("WinHttp.WinHttpRequest.5.1")
    if Method = GET
    {
        Try
        {
            hObject.Open("GET",url)
            hObject.Send()
        }
        catch e
            return -1
    }
    else if Method = POST
    {
        Try
        {
            hObject.Open("POST",url,False)
            hObject.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded")
            hObject.Send(postData)
        }
        catch e
            return -1
    }
 
    if (Encoding && hObject.ResponseBody)
    {
        oADO := ComObjCreate("adodb.stream")
        oADO.Type := 1
        oADO.Mode := 3
        oADO.Open()
        oADO.Write(hObject.ResponseBody)
        oADO.Position := 0
        oADO.Type := 2
        oADO.Charset := Encoding
        return oADO.ReadText(), oADO.Close()
    }
    return hObject.ResponseText
}

Headers(referer = "")
{
    global userAgent
    if !userAgent				;如果没指定userAgent，则指定给他userAgent为IE8   ，userAgent和Referer一般复制浏览器里面得到的数据就行
        userAgent := "Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0)"   ;IE8的默认userAgent
    Headers =
    ( LTRIM
        Referer: %referer%
        User-Agent: %userAgent%
    )
    return Headers
}


json_toobj(str){
	quot := """"
	ws := "`t`n`r " Chr(160)
	obj := {}
	objs := []
	keys := []
	isarrays := []
	literals := []
	y := nest := 0
	StringGetPos, z, str, %quot%
	while !ErrorLevel
	{
		StringGetPos, x, str, %quot%,, % z + 1
		while !ErrorLevel
		{
			StringMid, key, str, z + 2, x - z - 1
			StringReplace, key, key, \\, \u005C, A
			if SubStr( key, 0 ) != "\"
				break
			StringGetPos, x, str, %quot%,, % x + 1
		}
		str := ( z ? SubStr( str, 1, z ) : "" ) quot SubStr( str, x + 2 )
		StringReplace, key, key, \%quot%, %quot%, A
		StringReplace, key, key, \b, % Chr(08), A
		StringReplace, key, key, \t, % A_Tab, A
		StringReplace, key, key, \n, `n, A
		StringReplace, key, key, \f, % Chr(12), A
		StringReplace, key, key, \r, `r, A
		StringReplace, key, key, \/, /, A
		while y := InStr( key, "\u", 0, y + 1 )
		if ( A_IsUnicode || Abs( "0x" SubStr( key, y + 2, 4 ) ) < 0x100 )
			key := ( y = 1 ? "" : SubStr( key, 1, y - 1 ) ) Chr( "0x" SubStr( key, y + 2, 4 ) ) SubStr( key, y + 6 )
		literals.Insert(key)
		StringGetPos, z, str, %quot%,, % z + 1
	}
	key := isarray := 1
	Loop Parse, str, % "]}"
	{
		StringReplace, str, A_LoopField, [, [], A
		Loop Parse, str, % "[{"
		{
			if ( A_Index != 1 )
			{
				objs.Insert( obj )
				isarrays.Insert( isarray )
				keys.Insert( key )
				obj := {}
				isarray := key := Asc( A_LoopField ) = 93
			}
			if ( isarray )
			{
				Loop Parse, A_LoopField, `,, % ws "]"
					if ( A_LoopField != "" )
						obj[key++] := A_LoopField = quot ? literals.Remove(1) : A_LoopField
			}
			else
			{
				Loop Parse, A_LoopField, `,
					Loop Parse, A_LoopField, :, % ws
						if ( A_Index = 1 )
							key := A_LoopField = quot ? literals.Remove(1) : A_LoopField
						else if ( A_Index = 2 && A_LoopField != "" )
							obj[key] := A_LoopField = quot ? literals.Remove(1) : A_LoopField
			}
			nest += A_Index > 1
		}
		if !--nest
			break
		pbj := obj
		obj := objs.Remove()
		obj[key := keys.Remove()] := pbj
		if ( isarray := isarrays.Remove() )
			key++
	}
return obj
}
Return
B0A4E258-B0C8-43DA-9E6D-096BAAB500B5:
;TC_右窗口:打开驱动器列表
QZTC_cm_RightOpenDrives()
Return
B0D344D6-4B4C-44FD-AC15-265F7581225B:
;Excel_定位-列最后一个非空单元格
Excel_Location_ColumnLastCell()
Return
B0E31ABB-1D56-49F5-954F-AE9528DD4645:
;TC_导航:转到根文件夹
QZTC_cm_GoToRoot()
Return
B1194DBE-FCC4-4D2B-A7F9-8577D3BA46D3:
;Word_页边距设置
Word_setMargin("1,1,1,1,0.5,0.5|2,2,2,2,1,1|2.5,2.5,2.5,2.5,1.5,1.5|2.54,2.54,3.17,3.17,1.5,1.75")
Return
B1B56237-A38E-4AA9-AE95-60AC92E9C8CB:
;TC_选择:反向选择
QZTC_cm_ExchangeSelection()
Return
B2565706-08E3-45DB-819D-F596504CC7CB:
;TC_用户:用户菜单1
QZTC_cm_UserMenu1()
Return
B2644A6B-3DB4-4B69-BC0E-59443BEA54CC:
;TC_视图:开启/关闭:文件夹按名称排序
QZTC_cm_SwitchDirSort()
Return
B29D0BB7-595C-4132-AAC5-169047F6362E:
;&1  一键启动-通讯类软件
CurDPI:=A_ScreenDPI
MyScale:=CurDPI/96
run , % QZData("%wechat%")
;sleep,2000
WinWaitActive, ahk_class WeChatLoginWndForPC, , 5
CurX:=140*MyScale
CurY:=280*MyScale
ControlClick, x%CurX% y%CurY%, ahk_class WeChatLoginWndForPC,,,, Pos

run , % QZData("%QQ%")
;sleep,2000
WinWaitActive, ahk_class TXGuiFoundation, , 5
CurX:=250*MyScale
CurY:=370*MyScale
ControlClick, x%CurX% y%CurY%, ahk_class TXGuiFoundation,,,, Pos

Return
B2C0D5B1-9E3C-4C68-A8F9-4A408DB315BF:
;TC_标签:目标窗口:激活标签5
QZTC_cm_TrgActivateTab5()
Return
B2C479FC-8A2D-40A8-B648-CCBC3BB4B6D5:
;Phantom_视图-放大
;sendinput,^NumpadAdd
;sendinput,!v
;sendinput,z
;sendinput,m
WinMenuSelectItem, A, , 视图, 缩放,放大

Return
B2CAC0D6-F80F-420E-8BD6-87A509441F08:
;TC_左窗口:不排序
QZTC_cm_LeftUnsorted()
Return
B304552E-B06C-4E6A-B73D-8838357E845F:
;TC_窗口:最大化TotalCommander
QZTC_cm_Maximize()
Return
B33B41EE-60B7-45A4-A7AC-D9C71C2B345F:
;TC_配置:编辑/查看
QZTC_cm_EditConfig()
Return
B350FC0F-6D45-4D4C-B03A-F9480D2D7755:
;Excel_筛选-与所选单元格后1-6个字符相同
Excel_Filter_EqualAsBehind(6)
Return
B3D58CAC-9F73-411D-835E-E9C0F60D6B7F:
;TC_配置:字体
QZTC_cm_FontConfig()
Return
B3DB985E-32E0-4935-B962-661728F4D2E7:
;TC_VIM:返回到上层文件夹，可返回到我的电脑
TC_GoToParentEx()
Return
B4DD6220-3BAA-496D-986F-B1FC06C882B3:
;TC_视图:一个独立文件夹树面板
QZTC_cm_SeparateTree1()
Return
B542912C-1EAD-4554-84FD-B8477FD12613:
;Word_段落行距-4倍
Word_setLineSpacing(4)
Return
B5980891-FACD-4479-8355-8D9D7C03339C:
;TC_排序:来源窗口:按第2列排序
QZTC_cm_SrcSortByCol2()
Return
B5F2BB76-F917-4043-995D-A74D9B446DD2:
;Word_大纲-5级目录
Word_setParagraphs_Style(5)
Return
B61C8A96-405A-4644-934F-024CD51C195D:
;TC_来源窗口:纵向/横向排列
QZTC_cm_VerticalPanels()
Return
B6CAA00A-B8D0-44EB-8C66-956DEFBF175A:
;Excel_选择-区域-到当前区域边缘-左
Excel_Selection_AddRegion("左")
Return
B6D61900-E9F4-4B2D-9041-39951A7309F0:
;Phantom_切换到左边标签
sendinput,^+{tab}
Return
B7B2E172-A3EA-4CE9-89EB-75A255774598:
;TC_配置:压缩程序
QZTC_cm_PackerConfig()
Return
B7BDF3F6-109F-4430-BFCC-11FDCF1D7559:
;FastStone_向右旋转并保存
WinGetClass, CurTitle,A
msgbox % CurTitle
if RegExMatch(CurTitle,"TFullScreenWindow")		;ahk_class TFullScreenWindow
{
	sendinput,^!r
}
if RegExmatch(CurTitle,"FastStoneImageViewerMainForm")		;ahk_class FastStoneImageViewerMainForm.UnicodeClass
{
msgbox 1
	WinMenuSelectItem, A, , 工具, "JPEG 无损旋转图像",向右旋转
	;sendinput,^!r
}
Return
B7E65DB5-D4B3-4C32-A6AD-014194F554C0:
;TC_选择:导出选择列表(Unicode)
QZTC_cm_SaveSelectionToFileW()
Return
B7F8DA65-F753-4936-9104-AAE53F5B3E5D:
;Excel_页面设置-设置为1页宽
Excel_PageSetup_FitTo1PageWide()
Return
B7FC7BDA-8ED2-46CF-9628-AC492F94C54E:
;Phantom_文件-打印当前页面
sendinput,^p
sleep,300
sendinput,!u
sleep,100
sendinput,{enter}

Return
B80C2D4B-101B-4ADE-9DCB-CA2324050D1B:
;TC_命令行:下一条命令
QZTC_cm_NextCommand()
Return
B812151B-42DF-42DE-9AC1-2EB57B3CD801:
;TC_FTP:按列表下载
QZTC_cm_FtpDownloadList()
Return
B815FACE-D383-4E39-B2AE-7346D1DC2D7E:
;TC_自定义列视图:右窗口:自定义列视图3
QZTC_cm_RightCustomView3()
Return
B824AD51-923B-499F-9F2B-74A0CA61BCDC:
;Excel_格式-增加小数位
Excel_Format_SetDecimalNum_Grow()
Return
B87D64D0-CDF6-484C-94F9-BD23410AB94A:
;TC_打印:打印文件列表(含子文件夹)
QZTC_cm_PrintDirSub()
Return
B87E14D5-A694-4D88-8BD8-1542B906C536:
;通用_定位文档开头（Ctrl+Home）
send,^{home)
Return
B8C03A0F-273E-4164-9BF2-829B493793E4:
;TC_VIM:将当前文件夹下的选定文件移动到上层目录中
TC_MoveSelectedFilesToPrevFolder()
Return
B8CC2815-ECA6-4A06-A484-5671ACF92BCB:
;Excel_其他-临时命令
sendinput,!=
sleep,300
sendinput,{enter}
Return
B8EBCB40-69F4-4EAD-8E00-131B3502969A:
;TC_VIM:标记文件，将文件注释改成m
TC_MarkFile()
Return
B91AB58D-F274-4262-95D9-A94585D55261:
;TC_左窗口:可执行文件
QZTC_cm_LeftExecs()
Return
B972367B-1C37-4EAB-9D86-ABEB18CF7F33:
;Word_插入分页符-下一节(2)
Word_insertBreak(2)
Return
B9ABE8CB-F5CF-4224-A1E8-D683C157E6F0:
;&W  比较 Word比较文档
MySel:=QZData("files")
MyParentPath:=
LeftFile:=
RightFile:=mc
loop,Parse,MySel,`n     ;循环读取每一行
{
	if A_index=1
	{
		SplitPath,A_loopfield,,MyParentPath
		LeftFile:=A_loopfield
	}
	if A_index=2
		RightFile:=A_loopfield
}
MsgBox, 35, 数据确认, 请确认数据：`n原始文档：%LeftFile%`n修订文档：%RightFile%`n`n如果不正确，按【否】交换，按【取消】取消
IfMsgBox,Cancel
	return
IfMsgBox,no
{
	TempFile:=LeftFile
	LeftFile:=RightFile
	RightFile:=TempFile
}
;打开程序并加载
AppPath:=QZData("%WinWord%")
;AppPath:="c:\Program Files\Microsoft Office\root\Office16\WINWORD.EXE"
run,%AppPath%
WinWaitActive ,ahk_class OpusApp,,15
if ErrorLevel
{
    MsgBox, 打开Word超时
    return
}
sendinput,{alt down}    ;分开写，避免与其他截图类软件冲突
sleep,50
sendinput,{alt up}
sleep,300
sendinput,r
sleep,300
sendinput,m
sleep,300
sendinput,c
sleep,1500
;controlclick,MsoCommandBar1,ahk_class bosa_sdm_msword
sendinput,{tab}
sleep,300
sendinput,{enter}
sleep,1500
Clipboard=%LeftFile%
sendinput,^v
sleep,500
sendinput,{enter}
sleep,1000
;controlclick,MsoCommandBar2,ahk_class bosa_sdm_msword
sendinput,{tab 2}
sleep,300
sendinput,{enter}
sleep,1500
Clipboard=%RightFile%
sendinput,^v
sleep,500
sendinput,{enter}
;sleep,1000
;sendinput,{tab 4}
;sleep,300
;sendinput,{enter}


Return
B9C555BA-4B77-453F-95AE-77D416832E4D:
;TC_左窗口:文件夹树
QZTC_cm_LeftTree()
Return
BA054EA5-EC1C-4D5A-8246-C76AFAD6EAE0:
;QQ浏览器_切换到【普通模式】
send,{esc}
vimd.changemode("普通模式")
MsgBox, 0, 提示, 【普通模式】, 0.3
Return
BA3322DC-86AC-4726-BD53-63D163D5AC17:
;TC_VIM: a-z历史导航
TC_azHistory()
Return
BA4067BF-6774-4D3E-BFB2-09346380ADFE:
;&7  重命名 添加后缀为(输入内容)
MySel:=QZData("files")
InputBox, MyNewExt, 提示,请输入新的后缀名
if (MyNewExt="")
	return
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	if InStr(FileExist(MyTemFile), "D")
		continue
	SplitPath,MyTemFile,MyOutFileName,MyOutDir,MyOutExt,MyOutNameNoExt,MyOutDrive
	MyNewFile =%MyOutDir%\%MyOutFileName%.%MyNewExt%
	FileMove,%MyTemFile%,%MyNewFile%
}
Return
BA9273C8-DEF4-4F93-93C1-843BB09D2D1B:
;QQ浏览器_上一个标签
sendinput,^+{tab}
Return
BB16F964-1A79-4745-9026-4388556FB049:
;TC_右窗口:快速查看(不用插件)
QZTC_cm_RightQuickInternalOnl()
Return
BB68114B-8AEB-45BC-87ED-D0933E28DB5F:
;Phantom_页面管理-旋转-从到-顺90
;sendinput,!o
;sendinput,t
WinMenuSelectItem, A, , 页面管理, 旋转页面
controlclick,combobox1,,旋转页面,,
sendinput,{down}
;sendinput,{enter}

Return
BB6A09AD-56CC-4938-B9C3-13299002F090:
;TC_文件操作:编辑
QZTC_cm_Edit()
Return
BB83E75C-B860-45DF-B724-93AA59D0408D:
;Excel_工作表-切换到下个工作表（可循环）
Excel_Worksheet_SelectNext()
Return
BB8A954C-7427-4891-9265-159FF48C2C4E:
;Phantom_页面管理-旋转-从到-逆90
;sendinput,!o
;sendinput,t
WinMenuSelectItem, A, , 页面管理, 旋转页面
controlclick,combobox1,,旋转页面,,
;sendinput,{enter}
Return
BC2EFCFA-A785-4D6A-B104-B537DC2F0284:
;Excel_格式-千分位
Excel_Format_Thousands()
Return
BC3DDEFF-A2AA-4963-8028-1466A0E73510:
;TC_命令行:将路径复制到命令行
QZTC_cm_AddPathToCmdline()
Return
BD05448B-AC22-4460-9506-FB2A813CB4AB:
;Excel_筛选-与所选单元格前1-9个字符相同
Excel_Filter_EqualAsFront(9)
Return
BD0FF61B-616E-4B65-A6EA-94B3145B221C:
;TC_导航:转到下一个选中的文件
QZTC_cm_GotoNextSelected()
Return
BD2EEDEF-893D-4C29-B2B2-C0AB514BBD78:
;Phantom_文件-不保存关闭
sendinput,^w
sendinput,n
Return
BD829D28-A130-4EDE-8E6F-5113FB99CCED:
;TC_右窗口:按文件名排序
QZTC_cm_RightByNam()
Return
BD904883-1217-44FA-99E9-9908E25F00EB:
;Excel_筛选-字体颜色
Excel_Filter_FontColor()
Return
BDA9CD05-F67F-49C9-9897-9D557A7E7218:
;Excel_工作表-移动到左侧
Excel_Worksheet_MoveLeft()
Return
BDC1477E-3885-4955-851F-23E811CE2C1B:
;TC_自定义列视图:来源窗口:自定义列视图7
QZTC_cm_SrcCustomView7()
Return
BE8825A4-BCAC-4345-99C3-59C24FB528E5:
;TC_其他:卸载所有插件
QZTC_cm_UnloadPlugins()
Return
BE90FEEB-D517-48F9-8684-6E4C24F13FCE:
;&U  中文转为 Unicode码
MySel:=QZData("{text}")
Curhwnd:=QZData("hWnd")
MyOutText:=CN2uXXXX(MySel)
/*
clipboard:=MyOutText
WinActivate,Ahk_ID %Curhwnd%
sleep,100
Send,^{vk56}
*/

MsgBox, 262145, 转换结果, %MyOutText%`n`n======`n`n确定：复制到剪贴板`n取消：直接退出
ifmsgbox, yes
	Clipboard:=MyOutText
return
Return
BEE586B9-0540-453D-8BC1-DDEC18C83973:
;TC_视图:刷新来源窗口
QZTC_cm_RereadSource()
Return
BF19D80E-C47D-4EF2-B48A-25E9B3854AB7:
;TC_排序:右窗口:按第9列排序
QZTC_cm_RightSortByCol9()
Return
BF496EEE-7741-47F2-96B3-5A8E146EA4BD:
;TC_右窗口:可执行文件
QZTC_cm_RightExec()
Return
BF8534F7-2F2C-4340-9C38-A53129ED0576:
;TC_剪贴板:复制选中的文件到剪贴板
QZTC_cm_CopyToClipboard()
Return
C00F1DF8-B333-4E59-B863-247B7CBD1D27:
;TC_左窗口:反向排序
QZTC_cm_LeftNegOrder()
Return
C041435C-A0C4-4602-80D6-DA3EA089B5AC:
;TC_导航:转到上一个驱动器
QZTC_cm_GotoPreviousDrive()
Return
C04879A9-5568-4710-BF77-1D67325EB83B:
;&M  转换为AHK原义延续片段
ResumeWin()
PreClipboard:=ClipboardAll
QZSel:=CustomFunc_QZSel()
Clipboard:=CustomFunc_TextEscaping2ContinuationSection(QZSel.text)

Send ^v
Clipboard:=PreClipboard
return
Return
C0FEE0D5-2909-4BB5-A8D5-933DC6B18C48:
;Word_大纲-3级目录
Word_setParagraphs_Style(3)
Return
C1359DA2-9DD8-4115-8166-2EB9FA66030A:
;TC_视图:显示/隐藏:XP主题背景
QZTC_cm_VisXPThemeBackground()
Return
C16E5DE4-8F3A-417C-B1A8-6740B7F0CE71:
;Excel_选择-区域-到当前区域边缘-下
Excel_Selection_AddRegion("下")
Return
C1DDCB96-44D3-4D19-9854-DF28AFB896F4:
;TC_来源窗口:快速查看
QZTC_cm_SrcQuickview()
Return
C23C459D-C372-454F-B0E9-3D30BB17E3E9:
;TC_其他:光标置于左窗口
QZTC_cm_FocusLeft()
Return
C2AE2CBB-43B6-4EE2-878D-BAE74C42DF8F:
;TC_来源窗口:不排序
QZTC_cm_SrcUnsorted()
Return
C2C9BAF0-7FC1-49EE-85AA-86E8E3374899:
;Word_字号-放大
Word_setFontGrow()
Return
C32BB695-16F6-4ABC-9DFE-422B5500E2B6:
;TC_视图:开启/关闭:叠置图标显示
QZTC_cm_SwitchOverlayIcons()
Return
C32D9F9D-501B-44A6-8D1F-1DE187786C30:
;Word_批处理格式文档4
;Word_VIMD批处理使用示例
;不想设置的内容，直接在行前添加【;】，注释当前行即可
--------------------------------------------------------------------------
;设置字号
;42=初号，36=小初，26=一号，24=小一，22=二号，18=小二,16=三号，15=小三，14=四号，12=小四，10=五号，9=小五,7=六号，6=小六，5=七号，5=八号
Word_setFontSize(10)

;设置字体
;宋体，黑体，仿宋，微软雅黑
Word_setFontName("宋体")

;设置字体、高亮颜色
;高亮颜色，ra=自动，rb=蓝色，rB=浅蓝，rg=绿色，rG=浅绿，r1=灰1，r2=灰2，r3=灰3，r4=灰4，rk=黑色，rn=无，ro=橙色，rO=浅橙，rr=红色，rR=浅红，rw=白色，ry=黄色，rY=浅黄
Word_setColor("ry")
;字体颜色，ta=自动，tb=蓝色，tB=浅蓝，tg=绿色，tG=浅绿，t1=灰1，t2=灰2，t3=灰3，t4=灰4，tk=黑色，to=橙色，tO=浅橙，tr=红色，tR=浅红，tw=白色，ty=黄色，tY=浅黄
Word_setColor("tr")

;设置对齐
;对齐格式，L=左对齐，C=居中，R=右对齐，J=两端对齐，D=分散对齐
Word_setAlignment("L")

;设置粗体
Word_setBold()
;设置斜体
Word_setItalic()
;设置下划线
Word_setUnderline()
;设置删除线
Word_setStrikeThrough()

;设置行间距
;1,5=1.5倍行距
Word_setLineSpacing(1.5)
;设置段前段后0行，（段前行数，段后行数，1=自动|0=0行）
Word_setParagraphs_Space(0,0,0)

;设置首行缩进
;两字符=0.35
Word_setFirstLineIndent(0.35)

;设置页边距
;(上边距，下边距，左边距，右边距，页眉边距，页脚边距）
Word_PageSetup_Margin(1,1,1,1,0.5,0.5)

;设置纸张方面
;自动转换
Word_PageSetup_Orientation()
Return
C33C4D60-2CB8-46B9-800C-E1CB11217751:
;TC_来源窗口:按扩展名排序
QZTC_cm_SrcByExt()
Return
C4C76CA8-7F37-45E6-9D09-98CD4FB0ABDB:
;TC_VIM:压缩文件到当前文件夹
TC_PackFilesToCurrentDir()
Return
C4D3798F-51C0-4FDB-9ABA-04B40E51ABA6:
;TC_左窗口:列表
QZTC_cm_LeftShort()
Return
C528A6EB-E245-49B3-8553-4F252ECFDB34:
;TC_文件操作:模仿按ENTER键
QZTC_cm_Return()
Return
C5A94C6B-0800-4609-8CA3-1024D36FA084:
;Excel_定位-到当前区域边缘-右
Excel_Location_EdgeCell("右")
Return
C5B0BCB9-248D-48E3-B8AE-E5D888BA9402:
;&Y  智能解压压缩
 GetFiles:=QZData("{file:path}")
 RunCmd=%A_ScriptDir%\Apps\Kawvin系列软件\Kawvin智能解压\Kawvin智能压缩解压.exe   -a  "%GetFiles%" 
runwait,%RunCmd%
Return
C5D12838-EFBE-4695-B0B3-1805AA26257C:
;TC_剪贴板:复制文件名
QZTC_cm_CopyNamesToClip()
Return
C62B0F91-8B97-4FC3-937C-1BE77C42B5F1:
;Word_字号-四号(14)
Word_setFontSize(14)
Return
C690C67E-64BB-445B-8BF6-923CD7B1CE7F:
;TC_标签:来源窗口:激活标签6
QZTC_cm_SrcActivateTab6()
Return
C6AF26D5-B9C6-4713-A46A-5472DD09EB1E:
;&6  重命名 删除后缀
MySel:=QZData("files")
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	if InStr(FileExist(MyTemFile), "D")
		continue
	SplitPath,MyTemFile,MyOutFileName,MyOutDir,MyOutExt,MyOutNameNoExt,MyOutDrive
	MyNewFile =%MyOutDir%\%MyOutNameNoExt%
	FileMove,%MyTemFile%,%MyNewFile%
}
Return
C730D030-C225-4C8C-94EB-77974CAA7502:
;TC_导航:前进
QZTC_cm_GotoNextDir()
Return
C7EC3E53-30B2-4982-8E05-7574EEB13878:
;TC_自定义列视图:来源窗口:自定义列视图3
QZTC_cm_SrcCustomView3()
Return
C834BC98-1CF1-4AAC-B62C-53261F42D04B:
;Phantom_视图-顺时针-全部
send ^+=
Return
C8E3E94B-8600-4120-AB53-2B99244349F3:
;TC_配置:保存文件夹历史记录
QZTC_cm_ConfigSaveDirHistory()
Return
C8E4AA98-9471-42B9-9CB1-B3ED22ECE0FD:
;TC_标签:目标窗口:激活标签8
QZTC_cm_TrgActivateTab8()
Return
C9016618-5243-4618-8CEA-2E0C95DF9B02:
;TC_排序:来源窗口:按第7列排序
QZTC_cm_SrcSortByCol7()
Return
C9316047-2B5A-4636-9603-1AA61F1DAA65:
;&1  压缩10% 以BetterJPEG
SelPath:=QZData("files")
MyAppPath:=QZData("%BetterJPEG%")
Run,%MyAppPath%,,Max

WinWait,ahk_exe BetterJPEG.exe,,5
if ErrorLevel		;如果5秒没激活，则退出
	return
WinActivate
ControlSetText,Edit1,%SelPath%,A
sleep,100
controlsend,Edit1,{enter}
sleep,2500
;~ WinMenuSelectItem,a,,文件,选择所有项目
ControlClick, x80 y280, ahk_exe BetterJPEG.exe,,RIGHT,, Pos	;相对于窗体左上角的相对位置点击
;sendinput,{AppsKey}
sendinput,{down 8}
sleep,50
sendinput,{enter}
sleep,500
ControlClick, x80 y280, ahk_exe BetterJPEG.exe,,RIGHT,, Pos	;相对于窗体左上角的相对位置点击
;~ sendinput,{AppsKey}
sendinput,{down 3}
sleep,50
sendinput,{right}
sleep,50
;~ sendinput,{down 1}	;50%
;~ sendinput,{down 2}	;30%
sendinput,{down 5}	;10%
sendinput,{enter}		;不下移75%，否则按上面
sleep,100
sendinput,{enter}	
Return
C97DBB60-6805-4879-B5AA-D675B0A879B2:
;Word_插入-日期（2017-12-31）
Word_Insert_Date("-")
Return
CA20F570-2C22-41D7-8A5D-2AFA6CD7B8B3:
;TC_文件操作:查看(用查看程序,但不用插件/多媒体)
QZTC_cm_ListInternalOnly()
Return
CA2F99C5-04BE-4C87-BBC6-8A13D4FDB50E:
;TC_标签:新建标签
QZTC_cm_OpenNewTab()
Return
CA3864BE-25B3-415C-85C9-19B8DB0E2BD8:
;Excel_定位-到当前区域边缘-上
Excel_Location_EdgeCell("上")
Return
CAC9B78E-0AD8-4ACF-BB00-DB887DD27A6F:
;TC_并口:卸载NT并口驱动程序
QZTC_cm_NTremoveDriver()
Return
CB1FC05B-50EC-489A-89D1-A07670198F71:
;TC_导航:转到上一个选中的文件
QZTC_cm_GotoPrevSelected()
Return
CB3D0133-5A2A-42CB-8ABE-ECAC92775F0F:
;TC_工具:文件关联
QZTC_cm_Associate()
Return
CB471A1C-1F5D-4CFB-B755-09681CDC11D3:
;Excel_行-选中行-隐藏
Excel_Row_Hide(1)
Return
CB5B5773-9100-4F7F-8666-27D5F8C786C3:
;通用_End
sendinput,{End}
Return
CB67B019-E48D-4D83-83E6-E545BCE48BEC:
;Excel_工作表-复制并粘贴当前工作表
Excel_Worksheet_CopyAndPaste()
Return
CB78D7A2-657F-4605-8E70-A36B4209C4C2:
;TC_视图:显示/隐藏:排序制表符
QZTC_cm_VisTabHeader()
Return
CBAA18CF-C976-42A7-940D-7DFA70C1B297:
;TC_排序:目标窗口:按第10列排序
;QZTC_cm_TrgSortByCol10()
Return
CBBC1C72-AEC2-4F39-9D8B-D34727955EA6:
;Phantom_文件-打印对话框
sendinput,^p
Return
CBC98E01-6C1B-497E-B76E-B38234260A1D:
;TC_其他:版本信息
QZTC_cm_VersionInfo()
Return
CBF11D5D-958C-4336-BA9A-2E0007D65225:
;TC_视图:窗口分隔栏位于100%TC8.0+
QZTC_cm_100Percent()
Return
CCE70B62-4528-4A3D-99A9-1E268FE28A0F:
;TC_VIM:无需确认，使用队列移动文件至另一窗口
TC_MoveUseQueues()
Return
CD2FCE1C-B45D-4F09-BF89-DB74EFD2F42A:
;Excel_数据处理-删除重复项
Excel_Data_DeleteRepetition()
Return
CDCAC147-FB2E-4882-8C11-101E45E890CF:
;TC_左窗口:展开所有文件夹
QZTC_cm_LeftDirBranch()
Return
CE1134A2-5A17-4AF3-A798-4D6610E574B1:
;Excel_格式-小数点0位
Excel_Format_SetDecimalNum(0)
Return
CE399C6B-EFBC-4206-AA26-649DA73BDAB0:
;TC_VIM: 激活TC，定位到命令行
TC_FocusTCCmd()
Return
CE6CCB49-EA49-4C5C-9261-8EA04006325B:
;TC_左窗口:显示文件备注
QZTC_cm_LeftComments()
Return
CEBCA124-B980-440C-9867-E7D5CF92F918:
;TC_VIM:打开驱动器列表:另侧
TC_OpenDriveThat()
Return
CF304287-97B9-447B-992D-7EB703BEE1D8:
;TC_VIM:打开驱动器列表:本侧
TC_OpenDriveThis()
Return
CF9D4FA0-C15C-4E7A-B94B-B4DCCD3DDCCE:
;&M  文件、文件夹移动到(...)
MySel:=QZData("files")
FileSelectFolder,MySelDir,*,3
if (MySelDir="")
	return
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	SplitPath,MyTemFile, SourceFolderName ; 仅从它的完全路径提取文件夹名称。
	if InStr(FileExist(MyTemFile), "D")  ;区分是否文件夹,Attrib= D ,则是文件夹
		FileMoveDir, %MyTemFile%, %MySelDir%\%SourceFolderName%
	else 
		FileMove,%MyTemFile%,%MySelDir%
}
Return
CFD09D5E-D1FA-401C-8AC9-701E1FFF9B5F:
;Excel_页面设置-在页眉中间设置文件名称
Excel_PageSetup_SetHeader("C","&F")
Return
D00067CB-D1CE-4D43-8B54-7CE412F5D881:
;TC_自定义列视图:来源窗口:自定义列视图6
QZTC_cm_SrcCustomView6()
Return
D027B605-B47A-464D-97D7-EB69F4F43E35:
;TC_标签:左窗口:激活标签5
QZTC_cm_LeftActivateTab5()
Return
D02B6C8D-A62F-4B09-860E-090536F1CC80:
;Excel_其他-重复命令
Excel_RepeatAction()
Return
D0FA47BE-B406-4370-A515-1B46A368B52B:
;Excel_格式-边框-边实内点
Excel_Format_SetBonder("内部垂直","点线","极细")
sleep,100
Excel_Format_SetBonder("内部水平","点线","极细")
sleep,100
Excel_Format_SetBonder("四周","实线","细")
Return
D10CC1AC-314D-43D8-849A-E829628C1164:
;Excel_单元格-合并/取消
Excel_Range_Merge()
Return
D15CB1A1-6CC9-4CB2-AEF3-8A99BF0FAEA8:
;TC_排序:左窗口:按第9列排序
QZTC_cm_LeftSortByCol9()
Return
D160BF4E-F78C-4EFD-BC58-CB97024B3044:
;Excel_页面布局-顶端标题行/左端标题列
Excel_PageSetup_PrintTitle()
Return
D17FAD46-627C-4BA0-997B-017CA74F5548:
;TC_排序:左窗口:按第8列排序
QZTC_cm_LeftSortByCol8()
Return
D18E17E3-D86B-4258-98B0-9BF5FB6F9DF4:
;Excel_缩进对齐-增加
Excel_Format_InsertIndent(1)
Return
D251B13E-F3AF-47BE-8923-F3532CAE3F34:
;&N  复制文件名
names := ""
for i, f in StrSplit(QZData("Files"), "`n")
{
	SplitPath, f, name
	names .= name "`n"
}
Clipboard := Trim(names, "`n")
Return
D2666366-71FE-4B39-8EBA-7F2F4B7E5EE9:
;Excel_筛选-填充颜色
Excel_Filter_InteriorColor()
Return
D277B30E-ED28-4D58-AF1F-5109D4A4A65B:
;TC_右窗口:自定义类型
QZTC_cm_RightUserDe()
Return
D28889B2-BFA6-4A07-B55D-9138AA1940F9:
;TC_自定义列视图:来源窗口:自定义列视图2
QZTC_cm_SrcCustomView2()
Return
D2BC764A-7701-4A7F-A33E-5F4906F4328F:
;Excel_筛选-与所选单元格后1-9个字符相同
Excel_Filter_EqualAsBehind(9)
Return
D3BCBBDC-C386-4F5B-B9BF-0AC377A0216A:
;TC_文件操作:编码文件(MIME/UUE/XXE格式)
QZTC_cm_Encode()
Return
D3ECE264-BD2C-4777-966B-3E10F4D75D93:
;TC_视图:开启/关闭:一个独立文件夹树面板
QZTC_cm_ToggleSeparateTree1()
Return
D4DC1847-A5B7-459A-BADB-43068A3D79F2:
;Word_字号-三号(16)
Word_setFontSize(16)
Return
D4F11B78-72C6-475B-905F-41AEF6797918:
;Word_字号-小一(24)
Word_setFontSize(24)
Return
D50F992D-1645-425A-983C-CB62EB084746:
;Excel_单元格-填充-以上方单元格值
Excel_Range_FillWith("上")
Return
D5852C23-8100-49F3-AC33-4C8EB30A0520:
;Excel_单元格-合并且保留所有内容
Excel_Range_MergeAndKeepValue()
Return
D5C00CE8-3E4E-4F4B-B805-96F555EF92DA:
;Excel_行-选中行-显示
Excel_Row_Hide(0)
Return
D5D94D1F-C9A3-4E86-92B3-570323A6481E:
;TC_视图:窗口分隔栏位于50%
QZTC_cm_50Percent()
Return
D5DC571E-E2C9-4AD2-AE78-840DBEBAACED:
;TC_自定义列视图:来源窗口:自定义列视图9
QZTC_cm_SrcCustomView9()
Return
D6133E8E-7E6D-4368-9CB7-1325D796664D:
;Excel_筛选-与所选单元格前1个字符相同
Excel_Filter_EqualAsFront(1)
Return
D658880E-294C-4D87-8E6E-4C8A573D02EA:
;PotPlayer_后退
sendinput,{left}
Return
D66F8D4C-9E45-4E8D-BF5A-383BB0F54675:
;通用_向左
sendinput,{left}
Return
D6AB164D-DF87-49DE-9A1F-C312FA374333:
;TC_排序:左窗口:按第7列排序
QZTC_cm_LeftSortByCol7()
Return
D6CD975D-4EC2-4870-86E5-EBC26B9AE4BF:
;TC_文件操作:复制
QZTC_cm_Copy()
Return
D6FCCDB2-11EB-4EE2-875F-A97E1396435C:
;TC_工具:比较文件内容
QZTC_cm_CompareFilesByContent()
Return
D7300225-8209-4CD9-A046-B7FAB0E30861:
;Word_图片-浮于文字上方(32)
Word_setShape_WrapFormat(32)
Return
D76B0D86-0CBB-4FD9-A6DF-2BC2FF4BB664:
;TC_VIM:不打开文件就复制文件内容
TC_CopyFileContents()
Return
D7A4B31F-5AC2-4234-AD34-9EC622F5BC24:
;TC_工具:在单独进程搜索文件
QZTC_cm_SearchStandalone()
Return
D878C6E0-0F3C-46AC-BDE2-AA6FEA36AC76:
;TC_来源窗口:详细信息
QZTC_cm_SrcLong()
Return
D8B497F8-2D67-4369-A8E0-B7653EB8EC73:
;TC_自定义列视图:左窗口:自定义列视图5
QZTC_cm_LeftCustomView5()
Return
D97EDA73-F587-499C-8581-7666384E97E2:
;Excel_格式-边框-四周实线
Excel_Format_SetBonder("四周","实线","细")
Return
D9876D77-E020-4A9A-9700-10DA0EFAFF04:
;TC_剪贴板:复制文件名及网络路径
QZTC_cm_CopyNetNamesToClip()
Return
D99779EA-8D03-4FBF-9334-50B36496B041:
;TC_配置:其他/确认
QZTC_cm_Confirmation()
Return
DA202702-F223-4DCF-BABC-D18DD86E10A4:
;TC_排序:左窗口:按第3列排序
QZTC_cm_LeftSortByCol3()
Return
DAAB5EF2-9EF0-4BA5-9C05-DDC4C5BC21B6:
;Excel_切换到【VIM模式】
send,{esc}
vimd.changemode("VIM模式")
MsgBox, 0, 提示, 【VIM模式】, 0.3
;excel:=Excel_Get()
;excel.statusBar:="VIM模式"
Return
DAECB978-7058-4B16-BB2E-AA566DDE6BE8:
;Excel_选择-单元格-向左添加
Excel_Selection_AddRange("左")
Return
DAF75464-CD0B-4184-BDF7-EA18C54C1060:
;Excel_筛选-与所选单元格后1-7个字符相同
Excel_Filter_EqualAsBehind(7)
Return
DB92F565-53D8-431D-87B7-019BF6CDB5AD:
;Excel_列-删除列-从当前列到左侧头部
Excel_Column_DeleteFromCurrentToFirst()
Return
DBB26E29-57B0-4006-8893-E98B4DBCB547:
;&D  有道翻译
Youdao_keyword=% QZData("text")
Youdao_译文:=YouDaoApi(Youdao_keyword)
;~ 	MsgBox %Youdao_译文%

Youdao_音标:= json(Youdao_译文, "basic.phonetic")
Youdao_基本释义:= json(Youdao_译文, "basic.explains")
Youdao_网络释义:= json(Youdao_译文, "web.value")
Gui Gui_youdao_danci: Font,s14 微软雅黑 c62384C q2
If Youdao_基本释义<>
{
    Gui Gui_youdao_danci:add,Edit,x10 y10  w300 h100,[ %Youdao_音标% ]
    Gui Gui_youdao_danci:add,Edit,x10 y120 w300 h100,%Youdao_基本释义%
    Gui Gui_youdao_danci:add,Edit,x10 y230 w300 h100,%Youdao_网络释义%
}
Else
{
    Youdao_音标:=RegExReplace(Youdao_译文,"m)({""translation""\:\["")|(""\],""query""\:.*)")
    Gui Gui_youdao_danci:add,Edit,x10 y10  w300 h300,%Youdao_音标%
}

Gui Gui_youdao_danci:show,,有道网络翻译
Return
Gui_youdao_danciGuiClose:
Gui_youdao_danciGuiEscape:
Gui Gui_youdao_danci:destroy
Return




YouDaoApi(KeyWord)
{
    KeyWord:=CustomFunc_SkSub_UrlEncode(KeyWord,"utf-8")
	url:="http://fanyi.youdao.com/fanyiapi.do?keyfrom=qqqqqqqq123&key=86514254&type=data&doctype=json&version=1.1&q=" . KeyWord
    WebRequest := ComObjCreate("WinHttp.WinHttpRequest.5.1")
    WebRequest.Open("GET", url)
    WebRequest.Send()
    result := WebRequest.ResponseText
    Return result
}


json(ByRef js, s, v = "")
{
	j = %js%
	Loop, Parse, s, .
	{
		p = 2
		RegExMatch(A_LoopField, "([+\-]?)([^[]+)((?:\[\d+\])*)", q)
		Loop {
			If (!p := RegExMatch(j, "(?<!\\)(""|')([^\1]+?)(?<!\\)(?-1)\s*:\s*((\{(?:[^{}]++|(?-1))*\})|(\[(?:[^[\]]++|(?-1))*\])|"
				. "(?<!\\)(""|')[^\7]*?(?<!\\)(?-1)|[+\-]?\d+(?:\.\d*)?|true|false|null?)\s*(?:,|$|\})", x, p))
				Return
			Else If (x2 == q2 or q2 == "*") {
				j = %x3%
				z += p + StrLen(x2) - 2
				If (q3 != "" and InStr(j, "[") == 1) {
					StringTrimRight, q3, q3, 1
					Loop, Parse, q3, ], [
					{
						z += 1 + RegExMatch(SubStr(j, 2, -1), "^(?:\s*((\[(?:[^[\]]++|(?-1))*\])|(\{(?:[^{\}]++|(?-1))*\})|[^,]*?)\s*(?:,|$)){" . SubStr(A_LoopField, 1) + 1 . "}", x)
						j = %x1%
					}
				}
				Break
			}
			Else p += StrLen(x)
		}
	}
	If v !=
	{
		vs = "
		If (RegExMatch(v, "^\s*(?:""|')*\s*([+\-]?\d+(?:\.\d*)?|true|false|null?)\s*(?:""|')*\s*$", vx)
			and (vx1 + 0 or vx1 == 0 or vx1 == "true" or vx1 == "false" or vx1 == "null" or vx1 == "nul"))
			vs := "", v := vx1
		StringReplace, v, v, ", \", All
		js := SubStr(js, 1, z := RegExMatch(js, ":\s*", zx, z) + StrLen(zx) - 1) . vs . v . vs . SubStr(js, z + StrLen(x3) + 1)
	}
	Return, j == "false" ? 0 : j == "true" ? 1 : j == "null" or j == "nul"
		? "" : SubStr(j, 1, 1) == """" ? SubStr(j, 2, -1) : j
}
Return
DC02BA2A-AD40-47DF-B3E0-37CB453F087D:
;TC_来源窗口:自定义视图菜单
QZTC_cm_SrcCustomViewMenu()
Return
DC42C5F0-4ABE-43CE-BFF4-986329627A0F:
;Excel_筛选-非空单元格
Excel_Filter_NotEmpty()
Return
DC97CBC0-076A-4860-BEB6-5428B7CAE080:
;通用_复制（Ctrl+C）
sendinput,^c
Return
DCE76976-E7D7-45A9-9C08-1E347D42A0F6:
;TC_选择:选择一组文件
QZTC_cm_SpreadSelection()
Return
DD05FBAA-DC21-41B2-9C9D-138070012E8D:
;TC_其他:媒体中心遥控器播放/暂停键快捷菜单
QZTC_cm_ShowRemoteMenu()
Return
DD27E543-96EB-4CE6-A87B-D796A48A3B84:
;TC_VIM:使用查看器打开光标所在文件(shift+f3)
TC_ViewFileUnderCursor()
Return
DD3BCC26-38A9-4ED2-862E-5C766BDBFC32:
;&2  重命名 文件、文件夹名(-当前日期)
CurDate=-%a_yyyy%%a_mm%%a_dd%
MySel:=QZData("files")
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	SplitPath,MyTemFile,MyOutFileName,MyOutDir,MyOutExt,MyOutNameNoExt,MyOutDrive
	if InStr(FileExist(MyTemFile), "D")
	{
		MyNewFile =%MyOutDir%\%MyOutNameNoExt%%CurDate%
		FileMoveDir,%MyTemFile%,%MyNewFile%
	} else {
		MyNewFile =%MyOutDir%\%MyOutNameNoExt%%CurDate%.%MyOutExt%
		FileMove,%MyTemFile%,%MyNewFile%
	}
}
Return
DDFF038C-73B9-4128-AB1B-BCD1669C16A5:
;TC_VIM:文件标注-取消
TC_UnMarkFile()
Return
DE13EB5C-022D-454F-A546-AF0F914B8999:
;TC_文件操作:重命名/移动
QZTC_cm_RenMov()
Return
DE6036DC-F0B0-4B58-86AD-0290D094622E:
;Excel_列-列宽增加
Excel_Column_SetWidth("+1")
Return
DEA93C97-2AAC-4030-9DB1-C7E7B52BFE71:
;TC_VIM:将选定文件移动到上层目录中
TC_MoveSelectedFilesToPrevFolder()
Return
DED6730E-F297-4828-B290-235B145B4C65:
;Word_打开Word文件
Word_OpenFile()
Return
DF1D0FAF-2FB0-4159-802C-82A34B3415CE:
;Word_字号-小五(9)
Word_setFontSize(9)
Return
DF4EC91E-9247-450A-9D94-6398B772418F:
;TC_VIM:将当前文件夹下的全部文件移动到上层目录中
TC_MoveAllFilesToPrevFolder()
Return
DF69E760-065E-4E79-BEDC-3BCDD118B5E2:
;TC_标签:来源窗口:激活标签7
QZTC_cm_SrcActivateTab7()
Return
DFAE85F8-9158-4F1C-BCFE-143D884FE55E:
;&7  压缩75% 以BetterJPEG
SelPath:=QZData("files")
MyAppPath:=QZData("%BetterJPEG%")
Run,%MyAppPath%,,Max

WinWait,ahk_exe BetterJPEG.exe,,5
if ErrorLevel		;如果5秒没激活，则退出
	return
WinActivate
ControlSetText,Edit1,%SelPath%,A
sleep,100
controlsend,Edit1,{enter}
sleep,2500
;~ WinMenuSelectItem,a,,文件,选择所有项目
ControlClick, x80 y280, ahk_exe BetterJPEG.exe,,RIGHT,, Pos	;相对于窗体左上角的相对位置点击
;sendinput,{AppsKey}
sendinput,{down 8}
sleep,50
sendinput,{enter}
sleep,500
ControlClick, x80 y280, ahk_exe BetterJPEG.exe,,RIGHT,, Pos	;相对于窗体左上角的相对位置点击
;~ sendinput,{AppsKey}
sendinput,{down 3}
sleep,50
sendinput,{right}
sleep,50
;~ sendinput,{down 1}	;50%
;~ sendinput,{down 2}	;30%
;~ sendinput,{down 5}	;10%
sendinput,{enter}		;不下移75%，否则按上面
sleep,100
sendinput,{enter}	
Return
DFC256CC-E8F7-4E3D-B4DA-E2BA03A01C5F:
;Excel_单元格-填充-以下方单元格值
Excel_Range_FillWith("下")
Return
DFDE6D14-494E-4FEF-A136-16F3D5F73696:
;PotPlayer_旋转
sendinput,!k
Return
E02F2EA6-D980-473F-872F-89AC920BC347:
;TC_窗口:最小化TotalCommander
QZTC_cm_Minimize()
Return
E0AB0B75-AB8E-4FF0-8813-F1AE5C996EA9:
;TC_其他:刷新选中文件的缩略图
QZTC_cm_ReloadSelThumbs()
Return
E0EB7318-63A4-4AC2-92AF-2696BE168445:
;TC_VIM:设置TC顶置
TC_AlwayOnTop()
Return
E12E4B4F-DCEB-4BB4-B95A-A296850CCB13:
;TC_VIM:显示/隐藏:菜单栏
TC_ToggleMenu()
Return
E1B10055-8C64-4A07-9AB4-15832DA6353A:
;&T  智能统一压缩(Ctrl:命名 Shift:加密 Caps:删除)
MyKeyStatus:=
if GetKeyState("Ctrl")
	MyKeyStatus.="Ctrl"
if GetKeyState("Shift")
	MyKeyStatus.="Shift"
if GetKeyState("Alt")
	MyKeyStatus.="Alt"
if GetKeyState("Win")
	MyKeyStatus.="Win"
if GetKeyState("CapsLock", "T")
	MyKeyStatus.="Caps"

MySel= % QZData("files")
MyParentPath:=
loop,Parse,MySel,`n     ;读取第一行所在目录
{
	SplitPath,A_loopfield,,MyParentPath
	break
}
SplitPath,MyParentPath,,,,MyZipFile		;获取所在目录名称
if (instr(MyKeyStatus,"Ctrl")>0)		;按住Ctrl则要求输入文件名，否则以所选文件所在目录名称为压缩文件名
{
	InputBox, MyInput, 提示,`n请输入压缩文件名称`n`n如果为空，则默认使用所选文件所在目录名称
	if MyInput!=
		MyZipFile=%MyInput%
}
MyZipFile:=MyParentPath . "\" . MyZipFile	;压缩文件名称，无后缀
if (instr(MyKeyStatus,"Shift")>0)	;按住Shift则要求输入密码
{
	InputBox, MyPsw, 提示,`n请输入加密密码`n`n如果为空，则默认不加密`n加密文件名,密码形式为 xxxx`|x ，压缩格式为7z
	if ErrorLevel
		MyPsw:=
} else
	MyPsw:=
if (instr(MyKeyStatus,"Caps")>0)	;Caps如果按下，则压缩后删除文件
	MyDelete:=1
else
	MyDelete:=0

Zip7=%A_ScriptDir%\Apps\7-Zip\7zg.exe		;7zg所在目录

if !InStr(MySel,"`n")  ;若不是多文件则执行下列命令，以所选文件为压缩文件名
{
	if InStr(FileExist(MySel), "D") ;若为文件夹则执行下来命令
	{
		SplitPath, MySel, name, dir, ext, name_no_ext, Drive
		Loop, %MySel%\* ,1   ;1表示获取文件夹文件夹.
		{
			if A_Index=1
			{
				File=% A_LoopFileFullPath
				continue
			}
			File.= "`r" . "`n" . A_LoopFileFullPath
		}
		MyFileList := RegExReplace(File, "\r\n", """ """) 
		MySub_7ZipAddAll(Zip7,MyFileList,MyZipFile,MyPsw,MyDelete)
		if MyDelete
		{
			loop,Parse,MyFileList,`n,`r
			{
				if InStr(FileExist(A_LoopField), "D")
					FileRemoveDir,%A_LoopField%
				else
					FileDelete,%A_LoopField%
			}
		}
		return
	} else  {
		MyFileList:=MySel
		MySub_7ZipAddAll(Zip7,MyFileList,MyZipFile,MyPsw,MyDelete)
		if MyDelete
		{
			loop,Parse,MyFileList,`n,`r
			{
				if InStr(FileExist(A_LoopField), "D")
					FileRemoveDir,%A_LoopField%
				else
					FileDelete,%A_LoopField%
			}
		}
		return
	}
}

Loop,Parse,MySel,`n,`r  ;若为多文件，则执行下列命令,以上一级文件名为压缩文件名
{
	SplitPath, A_LoopField, name2, dir, ext, name_no_ext, Drive
	if A_Index=1
	{
		File=% A_LoopField
		continue
	}
	File.= "`r" . "`n" . A_LoopField
}
MyFileList := RegExReplace(File, "\r\n", """ """)  
MySub_7ZipAddAll(Zip7,MyFileList,MyZipFile,MyPsw,MyDelete)
if MyDelete
{
	loop,Parse,MyFileList,`n,`r
	{
		if InStr(FileExist(A_LoopField), "D")
			FileRemoveDir,%A_LoopField%
		else
			FileDelete,%A_LoopField%
	}
}
return

;~ 压缩过程，Zip7=7Zip路径,MyFileList=要压缩的文件列表,MyZipFile=压缩文件名称，MyPsw=密码,MyDelete=是否删除，1为删除
;~ MySub_7ZipAddAll(Zip7,MyFileList,MyZipFile,MyPsw,MyDelete:=0)
MySub_7ZipAddAll(Zip7,MyFileList,MyZipFile,MyPsw,MyDelete:=0)
{
	if MyPsw!=
	{
		StringSplit,MyArray_PSW,MyPSW,`|
		if MyArray_PSW2!=
		{
			MyZipFile:=MySub_CheckExistAll(MyZipFile,"7z")
			MyCmdLine=%Zip7% a "%MyZipFile%" `-p%MyArray_PSW1% -mhe "%MyFileList%"
		} else {
			MyZipFile:=MySub_CheckExistAll(MyZipFile,"zip")
			MyCmdLine=%Zip7% a "%MyZipFile%" `-p%MyArray_PSW1% "%MyFileList%"
		}
	} else {
		MyZipFile:=MySub_CheckExistAll(MyZipFile,"zip")
		MyCmdLine=%Zip7% a "%MyZipFile%" "%MyFileList%"
	}
	Run,%MyCmdLine%,,UseErrorLevel
	;~ if MyDelete
	;~ {
		;~ loop,Parse,MyFileList,`n,`r
		;~ {
			;~ if InStr(FileExist(A_LoopField), "D")
				;~ FileRemoveDir,%A_LoopField%
			;~ else
				;~ FileDelete,%A_LoopField%
		;~ }
	;~ }
}

MySub_CheckExistAll(FileNameNoExt,ext)
{
	IfExist,%FileNameNoExt%.%ext%   ;已经存在了以“首层文件夹命名”的文件夹，怎么办？
	{
		Loop
		{
			FolderName=%FileNameNoExt%( %A_Index% ).%ext%
			If !FileExist( FolderName )
			{
				return, %FolderName%
				break
			}
		}
		return
	}
	FolderName=%FileNameNoExt%.%ext%
	return, %FolderName%
}

Return
E1F229AD-3EA3-46E6-AEBB-0A328A1EB084:
;TC_视图:开启/关闭:32位system32目录重定向(64位Windows)
QZTC_cm_SwitchX64Redirection()
Return
E24115E2-1A6E-4B54-812D-E089D9590B3C:
;TC_选中目录在【左侧窗口】新建标签并激活
;Postmessage, 1075, 3004, 0,, ahk_class TTOTAL_CMD
sendinput,^{left}
Return
E2BC6F32-B5D0-49E6-ABB8-C733D6185566:
;&S  转换为AHK原义单行文本
QZSel:=CustomFunc_QZSel()
WinActivate % "ahk_class " QZSel.WinClass
WinWaitActive % "ahk_class " QZSel.WinClass
PreClipboard:=ClipboardAll
sleep 200
Clipboard:=CustomFunc_TextEscaping2SingleLine(QZSel.text)
Send ^v
Clipboard:=PreClipboard
return
Return
E2BE0310-3421-481B-8C53-E36AF74E35BB:
;&A  提取全部链接
MySel:=QZData("{text}")
ZZIni=%A_ScriptDir%\User\我的常用正则表达式.txt
fileread,AllZZExpress,%ZZIni%
ZZName:=[]
ZZExpress:=[]
loop ,Parse ,AllZZExpress,`n
{
	StrLine:=trim(A_LoopField)
	if (substr(StrLine,1,3)="功能：") or  (substr(StrLine,1,3)="功能:") {
		StrLine:=StrReplace(StrLine,"功能：","")
		StrLine:=StrReplace(StrLine,"功能:","")
		ZZName.push(StrLine)
		continue
	}
	if (substr(StrLine,1,4)="表达式：") or  (substr(StrLine,1,4)="表达式:") {
		StrLine:=StrReplace(StrLine,"表达式：","")
		StrLine:=StrReplace(StrLine,"表达式:","")
		ZZExpress.push(StrLine)
	}
}
Gui Add, Text, x11 y6 w65 h23 +0x200, 正则表达式
Gui Add, Edit, x80 y8 w392 h21 vMyExpress, 
Gui Add, ListView, x9 y72 w464 h265  AltSubmit gZZMyListViewClick, 作用|正则表达式
Gui Add, Button, x80 y39 w65 h25 gZZClean, 清除
Gui Add, Button, x225 y39 w65 h25 gZZOK, 提取
Gui Add, Button, x405 y39 w65 h25 gZZEdit, 编辑列表
loop,% ZZName.Length()
	LV_Add("",A_index . "." . ZZName[A_index] , ZZExpress[A_index])
;~ LV_ModifyCol()  
LV_modifycol(1,200)
LV_modifycol(2,250)
Gui Show, w480 h345, 表达式规则


ZZMyListViewClick:
	if A_GuiEvent =Normal 
	{
		LV_GetText(LvText,A_EventInfo,2)
		guiControl,,MyExpress,%LvText%
	}
return
	
ZZClean:
	guiControl,,MyExpress,
return

ZZEdit:
	run,%ZZIni%
return

ZZOK:
	GuiControlGet,MyExpress,,MyExpress
	MyMatchArray:=MyFun_RegExMatchAll(MySel,MyExpress)
	OutStr:=""
	i:=1
	while (i<=MyMatchArray.maxindex())
	{
		OutStr.= MyMatchArray[i]  "`n"
		i+=1
	}
	OutStr:=RegExReplace(OutStr,"\s*$","")   ;顺便删除最后的空白行，可根据需求注释掉
	MsgBox, 36, 提取到的数据, %OutStr%`n`n是否复制到 【剪贴板】 ？
	IfMsgBox,Yes
		Clipboard:=OutStr
	gui,Destroy
return

MyFun_RegExMatchAll(ByRef Haystack,NeedleRegEx,SubPat="")
{
	arr:=[],startpos:=1
	while (pos:=Regexmatch(Haystack,NeedleRegEx,match,startPos))
	{
		arr.push(match%SubPat%)
		startPos:=pos+StrLen(match)
	}
	;~ msgbox % arr.MaxIndex()
	return arr.maxindex() ? arr : ""
}
Return
E2DB1CB5-4107-494B-A509-26BDE3DD32B3:
;TC_视图:显示/隐藏:工具栏
QZTC_cm_VisButtonbar()
Return
E31B352C-B28D-4B57-8DB3-DF10C251A0A4:
;TC_标签:下一个标签(Ctrl+Tab)
QZTC_cm_SwitchToNextTab()
Return
E37F9F3D-4AE6-4C5C-8D42-BAC779C8406E:
;TC_标签:转到锁定标签的根文件夹
QZTC_cm_GoToLockedDir()
Return
E38FFB94-6B00-4140-BCCF-549ED6376AD1:
;TC_VIM:选择命令来执行
TC_SelectCmd()
Return
E3B04D71-00B2-47AB-839C-1800F52A9DD2:
;Word_右对齐
Word_setAlignment("R")
Return
E48B6974-AF4A-465B-AEF1-4ECF3BD35D5B:
;TC_标签:目标窗口:激活标签1
QZTC_cm_TrgActivateTab1()
Return
E5218E1A-1B57-4F9E-8391-1724A78023B8:
;TC_自定义列视图:来源窗口:自定义列视图4
QZTC_cm_SrcCustomView4()
Return
E5649197-3873-47D8-8F27-2043D241FF94:
;Excel_页面设置-以当前单元格的值设置页脚中间
Excel_PageSetup_SetFooter("C","")
Return
E5724597-880F-46B6-A1FE-F1271D0A7C64:
;Excel_选择-单元格-向右添加
Excel_Selection_AddRange("右")
Return
E6435E12-0091-4D85-88A8-F4E8DEFAE013:
;Word_切换到【普通模式】
vimd.changemode("普通模式")
MsgBox, 0, 提示, 【普通模式】, 0.3
Return
E6E29B22-AD04-49B2-891E-18C33D22E808:
;Excel_筛选-结尾是
Excel_Filter_EndWith()
Return
E6E57185-D061-4D5F-9F9D-A3B10909D272:
;Word_字体-仿宋
Word_setFontName("仿宋")
Return
E7143339-1F4F-4C50-9B18-C3F2A44510AB:
;TC_左窗口:自定义类型
QZTC_cm_LeftUserDef()
Return
E73808D5-A52D-40A7-89BF-5EF80BF919E6:
;TC_排序:目标窗口:按第6列排序
QZTC_cm_TrgSortByCol6()
Return
E7599DDC-2D70-4ED1-B2CE-B9889D86EC8C:
;Excel_筛选-与所选单元格前1-4个字符相同
Excel_Filter_EqualAsFront(4)
Return
E75DE625-0338-4421-BE7E-C5BA7998CD58:
;TC_自定义列视图:右窗口:自定义列视图2
QZTC_cm_RightCustomView2()
Return
E7945DF6-13CC-4719-9CDF-7DC8D4D69842:
;&R  重启Explorer
Process, Close, explorer.exe 
Process,Exist,explorer.exe 
if ErrorLevel=0
	{
	MsgBox 哈哈，关闭了资源管理器
	sleep 500
	run explorer.exe 
	return
	}
else
	MsgBox 没有关闭
return
Return
E7EC2527-6023-4640-96F6-2A5FD5346C23:
;TC_VIM:只复制文件名，不含扩展名
TC_CopyNameOnly()
Return
E8C345B8-3B2D-4465-895C-A544B587855E:
;TC_导航:在左窗口打开光标处的文件夹或压缩包
QZTC_cm_TransferLeft()
Return
E9243FED-5368-4ACB-A2EF-F16BEC4E7A22:
;Phantom_视图-缩小
;sendinput,^Numpadsub
;sendinput,!v
;sendinput,z
;sendinput,o
WinMenuSelectItem, A, , 视图, 缩放,缩小
Return
E9758FD0-0B6B-4029-938C-F9C3F5AFD284:
;Word_分散对齐
Word_setAlignment("D")
Return
E9DFA35F-6766-40A6-99B4-9D6B44CEC860:
;Word_段前间距-自动
Word_setParagraphs_Space("","",1)
Return
EA26558D-0833-48CA-94F3-2E9B175E436C:
;Word_设置/取消斜体
Word_setItalic()
Return
EA75BCA1-6DFE-4721-90C7-3945366C8475:
;TC_剪贴板:复制来源路径
QZTC_cm_CopySrcPathToClip()
Return
EBCB5C2C-0EDF-4DFB-9AF6-2002AEE4F2C8:
;Word_设置/取消删除线
Word_setStrikeThrough()
Return
EC07040A-569A-4170-9DD0-E23D6DA9FF4C:
;TC_VIM:移动到常用文件夹
TC_MoveDirectoryHotlist()
Return
EC193850-9028-4BD2-936C-7FB94E669310:
;TC_窗口:自定义视图菜单
QZTC_cm_LeftCustomViewMenu()
Return
EC50E231-CF72-42F5-ABF5-7399F4E8625F:
;TC_导航:桌面
QZTC_cm_OpenDesktop()
Return
EC64CD62-672A-4A11-954C-C61F22F0E452:
;TC_VIM:文件操作-删除指定类文件（界面）
TC_DeleteByExt_GUI()
Return
ED5B60C9-8D19-466E-B8CA-560E3545B058:
;TC_视图:启用/禁用:文件夹自动刷新
QZTC_cm_SwitchWatchDirs()
Return
ED8AF801-494A-406B-8A8C-16D1E28650A3:
;Word_复制格式
Word_CopyFormat()
Return
EDC281CC-FDED-4B40-8802-FA0C7C077112:
;Word_段前间距-0行
Word_setParagraphs_Space(0,0,0)
Return
EDC7CC87-25C5-423A-B3B8-783CC33CD736:
;TC_选择:选择一组:仅文件夹
QZTC_cm_SelectFolders()
Return
EDDAB578-787B-4CBC-9F72-244D9FAAB48A:
;&8  重命名 修改后缀为RAR
MySel:=QZData("files")
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	if InStr(FileExist(MyTemFile), "D")
		continue
	SplitPath,MyTemFile,MyOutFileName,MyOutDir,MyOutExt,MyOutNameNoExt,MyOutDrive
	MyNewFile =%MyOutDir%\%MyOutNameNoExt%.rar
	FileMove,%MyTemFile%,%MyNewFile%
}
Return
EDDEC70D-09C0-4415-9BD1-292E18DBF121:
;&1  重命名 (当前日期-)文件、文件夹名
CurDate=%a_yyyy%%a_mm%%a_dd%-
MySel:=QZData("files")
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	SplitPath,MyTemFile,MyOutFileName,MyOutDir,MyOutExt,MyOutNameNoExt,MyOutDrive
	if InStr(FileExist(MyTemFile), "D")
	{
		MyNewFile =%MyOutDir%\%CurDate%%MyOutNameNoExt%
		FileMoveDir,%MyTemFile%,%MyNewFile%
	} else {
		MyNewFile =%MyOutDir%\%CurDate%%MyOutNameNoExt%.%MyOutExt%
		FileMove,%MyTemFile%,%MyNewFile%
	}
}
Return
EE02F4E0-8AEB-48CB-A6D6-509BFD81B277:
;&3  360文件粉碎机
ExePath=%APP%\360文件粉碎机独立版.exe
;指定程序路径
WinTitle=ahk_exe FileSmasher.exe
;打开程序后的默认标题
CustomFunc_RunD(ExePath,WinTitle,x=0,y=0,WaitDuration=0)
Return
Return
EE16B196-B7B3-4761-8984-7A0AB3300D98:
;Word_图片-穿越型环绕(2)
Word_setShape_WrapFormat(2)
Return
EE3B8B12-F070-4E8B-8C0D-C47860ACF286:
;TC_排序:来源窗口:按第3列排序
QZTC_cm_SrcSortByCol3()
Return
EEE7899B-814A-4029-8D65-FD46347B71C4:
;Excel_工作表-插入新工作表
Excel_Worksheet_Insert()
Return
EF1C645A-487C-436E-8E1A-0AC87B3AB459:
;通用_粘贴（Ctrl+V）
sendinput,^v
Return
EF5C230E-7C6E-41A5-A528-33904A8E1664:
;TC_右窗口:不排序
QZTC_cm_RightUnsorte()
Return
EF5F05BA-1F5E-48AF-88ED-FCA58E40B6BA:
;TC_标签:锁定/解锁当前标签
QZTC_cm_ToggleLockCurrentTab()
Return
EF835992-B415-463A-857B-C686DE082C81:
;Excel_定位-到[x]列[n]行
Excel_Location_Cell()
Return
EF928B0A-38C5-42D9-B70D-7C76D34960ED:
;TC_帮助:快捷键列表
QZTC_cm_Keyboard()
Return
F03310A7-D8D4-4F68-B0E6-0DB647666C10:
;TC_VIM:前进另一侧
TC_GotoNextDirOther()
Return
F06C12D0-EED9-44D5-8812-3DBDEB58114E:
;TC_自定义列视图:来源窗口:自定义列视图8
QZTC_cm_SrcCustomView8()
Return
F090E0C3-B06E-4A2F-BC20-3C92AF9F5844:
;TC_VIM:使用外部查看器打开(alt+f3)
TC_OpenWithAlternateViewer()
Return
F098E7DA-4AB1-4AC1-BA28-7A662E45EC6D:
;TC_命令行:上一条命令
QZTC_cm_PrevCommand()
Return
F0DD1749-8350-4C98-88AE-997567352204:
;TC_来源窗口:所有文件
QZTC_cm_SrcAllFiles()
Return
F1029C6E-476B-4C7C-953C-85E614FD48FA:
;TC_文件操作:创建快捷方式
QZTC_cm_CreateShortcut()
Return
F10C1FF2-ABB6-48DE-BA94-903DC31CD5D4:
;TC_自定义列视图:右窗口:自定义列视图9
QZTC_cm_RightCustomView9()
Return
F133F252-1E5F-4AC7-ABCF-2E4B5B65C762:
;TC_文件操作:查看(用查看程序)
QZTC_cm_List()
Return
F14D6D40-63BF-46AA-9F73-9128D13593E7:
;Word_替换
send,^h
Return
F16529BB-FCA0-4241-833F-3F121076BFAB:
;Phantom_切换到【普通模式】
send,{esc}
vimd.changemode("普通模式")
MsgBox, 0, 提示, 【普通模式】, 0.3
Return
F18B6BD7-6AE5-4A42-B1BE-805B8BEFE27D:
;TC_自定义列视图:左窗口:上一个自定义视图
QZTC_cm_LeftPrevCustomView()
Return
F1B1185A-185F-42AC-A0F2-F2D3C8AE5498:
;TC_排序:目标窗口:按第7列排序
QZTC_cm_TrgSortByCol7()
Return
F244C05C-9C23-4D4F-B018-C7FFB9A1FB15:
;Word_打印预览
Word_Dialogs_PrintPreview()
Return
F269B853-CB4C-48F7-A3F8-6BA10C8146CC:
;TC_窗口:退出TotalCommander
QZTC_cm_Exit()
Return
F282582F-9E5C-48B7-B74A-A31C3F71982B:
;Excel_编辑单元格（F2功能）
Excel_Range_Edit()
Return
F2832E84-0F6E-460C-A572-7E2B283234A2:
;Phantom_编辑-输入标签内容
global CurID
global PageStr:=[]

gui,font,s12
Gui Add, Edit, x9 y2 w465 h400 vMyVar_PDFLabels,
Gui Add, Button, x78 y405 w75 h32 default gMySub_PDFLabelOK, 确认
Gui Add, Button, x250 y405 w75 h32 gMySub_PDFLabelClear, 清空
gui,font
Gui Show, w481 h440, 输入标签内容
Return

MySub_PDFLabelOK()
{
	global CurID
	global PageStr:=[]
	GuiControlget,MyVar_PDFLabels,,MyVar_PDFLabels
	Loop, parse, MyVar_PDFLabels, `n, `r  ; 
	{
		if (A_LoopField!="")
			PageStr[A_Index]:=A_LoopField
	}
	CurID:=1
	gui,destroy
	msgbox,0,,% "已加载" PageStr.Length() "个书签",1
	return
}

MySub_PDFLabelClear()
{
	GuiControl,,MyVar_PDFLabels
	return
}
Return
F2E41288-5EE3-4EE9-A61B-9B2FCBAFF034:
;TC_文件操作:删除
;QZTC_cm_Delete()
TC_Delete()
Return
F2F08DD2-36CC-41E7-95A1-65E00BEB76C9:
;TC_排序:目标窗口:按第3列排序
QZTC_cm_TrgSortByCol3()
Return
F3873E02-2558-4CF7-B60F-D174B86A2E89:
;TC_其他:光标置于命令行
QZTC_cm_FocusCmdLine()
Return
F393E68F-EB2B-410F-A6CC-151AB72D2453:
;TC_左窗口:焦点置于路径上
QZTC_cm_LeftPathFocus()
Return
F3F37107-3544-43DD-910E-02F70E2661C8:
;TC_来源窗口:按日期时间排序
QZTC_cm_SrcByDateTime()
Return
F462451E-AFCB-47BB-ACB1-CD54409EC7AE:
;Excel_其他-错误检查
Excel_ErrorCheck()
Return
F4CE25ED-8DF8-41CE-A105-46FF692E99EA:
;Excel_单元格-格式-日期(2017.01.01)
Excel_Format_Date(".")
Return
F4D30BA8-D713-4E16-A69A-FC56BB75C978:
;QQ浏览器_下一个标签
sendinput,^{tab}
Return
F505D9F9-E882-45DF-AC5A-B2A520CB4E7E:
;Phantom_文件-保存关闭
sendinput,^s
sendinput,^w
Return
F5147277-BA3F-445B-9046-92471EC77D9B:
;通用_向下
sendinput,{down}
Return
F5181FE4-35F2-419A-9532-531A7733E8AB:
;Excel_格式-显示/不显示【零值】
Excel_Format_DisplayZeros()
Return
F558849D-49C2-4785-B63E-D4F5406529E2:
;通用_Home
sendinput,{Home}
Return
F5C2F5FB-088F-4EE6-9C29-404AC779709F:
;Word_批处理格式文档2
;Word_VIMD批处理使用示例
;不想设置的内容，直接在行前添加【;】，注释当前行即可
 ---------------------------------------------------------------------------------------
;设置字号
;42=初号，36=小初，26=一号，24=小一，22=二号，18=小二,16=三号，15=小三，14=四号，12=小四，10=五号，9=小五,7=六号，6=小六，5=七号，5=八号
Word_setFontSize(12)

;设置字体
;宋体，黑体，仿宋，微软雅黑
Word_setFontName("宋体")

;设置字体、高亮颜色
;高亮颜色，ra=自动，rb=蓝色，rB=浅蓝，rg=绿色，rG=浅绿，r1=灰1，r2=灰2，r3=灰3，r4=灰4，rk=黑色，rn=无，ro=橙色，rO=浅橙，rr=红色，rR=浅红，rw=白色，ry=黄色，rY=浅黄
;Word_setColor("ry")
;字体颜色，ta=自动，tb=蓝色，tB=浅蓝，tg=绿色，tG=浅绿，t1=灰1，t2=灰2，t3=灰3，t4=灰4，tk=黑色，to=橙色，tO=浅橙，tr=红色，tR=浅红，tw=白色，ty=黄色，tY=浅黄
;Word_setColor("tr")

;设置对齐
;对齐格式，L=左对齐，C=居中，R=右对齐，J=两端对齐，D=分散对齐
Word_setAlignment("L")

;设置粗体
;Word_setBold()
;设置斜体
;Word_setItalic()
;设置下划线
;Word_setUnderline()
;设置删除线
;Word_setStrikeThrough()

;设置行间距
;1,5=1.5倍行距
Word_setLineSpacing(1.5)
;设置段前段后0行，（段前行数，段后行数，1=自动|0=0行）
Word_setParagraphs_Space(0,0,0)

;设置首行缩进
;两字符=0.35
Word_setFirstLineIndent(0.35)

;设置页边距
;(上边距，下边距，左边距，右边距，页眉边距，页脚边距）
;Word_PageSetup_Margin(1,1,1,1,0.5,0.5)

;设置纸张方面
;自动转换
;Word_PageSetup_Orientation()
Return
F6488CB0-D842-4332-B250-05B0733FD5E7:
;Excel_筛选-与所选单元格前1-7个字符相同
Excel_Filter_EqualAsFront(7)
Return
F69F26AA-61B5-4A29-BD77-4157857420BE:
;Word_另存Word文件
Word_SaveFileAs()
Return
F6B5A97D-833A-4A9A-80E6-56914B7654B7:
;Excel_格式-小数点3位
Excel_Format_SetDecimalNum(3)
Return
F6D5EAE1-36DD-4774-A332-0F624F27F480:
;通用_定位文档结尾（Ctrl+End）
send,^{end}
Return
F6E63E20-4574-4F72-ADA3-36018F00D4EC:
;TC_来源窗口:按大小排序
QZTC_cm_SrcBySize()
Return
F6F46B48-0CB7-4572-8236-B48F774B8C0D:
;TC_排序:目标窗口:按第1列排序
QZTC_cm_TrgSortByCol1()
Return
F793D4CB-6CC4-49B9-875A-5D403CED8159:
;TC_用户:用户菜单2
QZTC_cm_UserMenu2()
Return
F88E5459-53E4-4BE9-AC04-484B6EF57714:
;Excel_页面设置-页边距
Excel_setMargin("0.5,0.5,0.5,0.5,0,0|1,1,1,1,0.5,0.5|1.5,1.5,1.5,1.5,0.5,0.5|2,2,2,2,1,1|2.5,2.5,2.5,2.5,1.5,1.5|2.54,2.54,3.17,3.17,1.5,1.75")
Return
F8F14610-C9A8-4A92-AF28-4CF4F0A95577:
;通用_VIMD清除输入
QZ_VIMD_ClearInput()
Return
F958FB27-475C-4500-846E-84B9C1B90D5F:
;TC_排序:右窗口:按第7列排序
QZTC_cm_RightSortByCol7()
Return
FA31A1AC-0DD5-4A4D-8FD3-E77BA22DCC24:
;Excel_筛选-与所选单元格前1-6个字符相同
Excel_Filter_EqualAsFront(6)
Return
FA8532ED-10A9-40AE-B537-7ADA6AB6B461:
;TC_配置:自定义列
QZTC_cm_CustomColumnConfig()
Return
FA887EBA-5914-48DE-AECD-E7AD5C2E782E:
;TC_排序:右窗口:按第8列排序
QZTC_cm_RightSortByCol8()
Return
FA90D939-D5CA-47DF-A499-89364713363F:
;TC_排序:来源窗口:按第4列排序
QZTC_cm_SrcSortByCol4()
Return
FAA6D686-A1CB-4C7C-9FEA-4794C5322F93:
;TC_其他:光标置于工具栏
QZTC_cm_FocusButtonBar()
Return
FAF17C59-C8C4-4F1E-9744-35347F2FFB09:
;Excel_列-选中列
Excel_Column_Select()
Return
FB285742-EE2D-4C27-A7AE-994444781D4D:
;Word_字号-小三(15)
Word_setFontSize(15)
Return
FB54BCF4-A4BD-429C-A91D-0A8BF1F78A94:
;&5  重命名 (父文件夹-)文件、文件夹名
MySel:=QZData("files")
ParentDir:=
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	if (A_index=1)
	{
		SplitPath,MyTemFile,MyOutFileName,MyOutDir
		SplitPath,MyOutDir,ParentDir
	}
	SplitPath,MyTemFile,MyOutFileName,MyOutDir,MyOutExt,MyOutNameNoExt,MyOutDrive
	if InStr(FileExist(MyTemFile), "D")
	{
		MyNewFile =%MyOutDir%\%ParentDir%-%MyOutNameNoExt%
		FileMoveDir,%MyTemFile%,%MyNewFile%
	} else {
		MyNewFile =%MyOutDir%\%ParentDir%-%MyOutNameNoExt%.%MyOutExt%
		FileMove,%MyTemFile%,%MyNewFile%
	}
}
Return
FB7CC282-E735-4485-A2FC-D7AE368F70AB:
;&4  重命名 文件、文件夹名(输入内容)
InputBox, MyInsert, 提示,请输入要添加的内容
if (MyInsert="")
	return
MySel:=QZData("files")
loop,Parse,MySel,`n     ;循环读取每一行
{
	MyTemFile := RegExReplace(A_loopfield,"(.*)\r.*","$1")
	SplitPath,MyTemFile,MyOutFileName,MyOutDir,MyOutExt,MyOutNameNoExt,MyOutDrive
	if InStr(FileExist(MyTemFile), "D")
	{
		MyNewFile =%MyOutDir%\%MyOutNameNoExt%%MyInsert%
		FileMoveDir,%MyTemFile%,%MyNewFile%
	} else {
		MyNewFile =%MyOutDir%\%MyOutNameNoExt%%MyInsert%.%MyOutExt%
		FileMove,%MyTemFile%,%MyNewFile%
	}
}
Return
FC57220F-6CD1-4163-B2F2-18C3B2BCB930:
;TC_导航:回收站
QZTC_cm_OpenRecycled()
Return
FC69AA53-0C0E-455C-8DF4-901988E64E35:
;Word_字号-二号(22)
Word_setFontSize(22)
Return
FC8533D2-7C2E-4829-9493-C8831BFEA2F9:
;Excel_列-选中列-隐藏
Excel_Column_Hide(1)
Return
FCA707B5-8746-4E2E-AA39-F3E094D0000C:
;Excel_筛选-重置所选列
Excel_Filter_ResetCurrentColumn()
Return
FD22BAD0-CBA3-4245-B363-A8A0F030239D:
;TC_VIM:最大化左侧/上部窗口
TC_WinMaxLeft()
Return
FD3ECE89-3DCA-4BC8-BA78-4EDC6A2F8E49:
;TC_配置:颜色
QZTC_cm_ColorConfig()
Return
FD683D3E-4308-43FD-9464-BDD688342459:
;TC_VIM:无需确认，使用队列拷贝文件至另一窗口
TC_CopyUseQueues()
Return
FD79162D-44AD-4FF9-A510-C1089350C042:
;TC_选择:不选扩展名相同的文件
QZTC_cm_UnselectCurrentNameExt()
Return
FDB75501-6D2A-4253-8B01-2951D4252347:
;Excel_格式-设置/取消粗体
Excel_Format_SetBold()
Return
FDFE808D-9306-4C98-A473-360ED7EA0D84:
;TC_配置:布局
QZTC_cm_Config()
Return
FE229CF0-2349-49E9-9A3F-ABCAC8A0166C:
;TC_配置:文件夹标签
QZTC_cm_DirTabsConfig()
Return
FE5BF3B2-DD07-4A8B-988D-D4157EE2C1C8:
;Excel_筛选-与所选单元格后1-5个字符相同
Excel_Filter_EqualAsBehind(5)
Return
FF151AB0-1546-4BD5-BB6B-84886D3D2EDB:
;TC_来源窗口:显示文件备注
QZTC_cm_SrcComments()
Return
FF43C26F-1B6E-47B8-A3C5-72B7ECD7BD40:
;TC_选择:选择同一路径下的文件(展开文件夹+搜索文件)
QZTC_cm_SelectCurrentPath()
Return
FF7C4EE1-9E28-4601-A24A-BC67F8F4184F:
;TC_并口:加载NT并口驱动程序
QZTC_cm_NTinstallDriver()
Return
FFD8A23C-27AA-461F-AC25-26F316DFB270:
;Excel_格式-用括号格式化负数
Excel_Format_SetMinus()
Return
FFD8D971-ABAA-4F26-9077-E869DB30DECA:
;Word_字号-六号(7)
Word_setFontSize(7)
Return
FFF8DBE4-4E85-457A-A151-B99EDDECCA5D:
;TC_选择:全部选择:仅文件夹
QZTC_cm_SelectAllFolders()
Return
/*
    功能：QuickZ在加载的时候执行此函数
*/
FSViewer_Init()
{
    Global VimD
}

/*
    功能：每次切换模式的时候执行此函数
*/
FSViewer_ChangeMode()
{
    Global VimD
}

/*
    功能：按下热键后，热键对应的功能执行前，会运行此函数
    * 默认返回False，功能正常执行。
    * 如果返回True，功能不会执行。
    可以利用这个函数设置自动判断模式
*/
FSViewer_ActionBefore()
{
    Global VimD
}

/*
    功能：热键对应的功能执行后，会运行此函数。
    函数不需要返回值
    可以利用这个函数来做状态提醒
*/
FSViewer_ActionAfter()
{
    Global VimD
}

/*
    功能：热键提醒，用于提示当前有效热键
    QuickZ会传递当前有效热键列表到此函数中。所以需要预留两个参数
    aTemp - 当前热键缓存
    aMore - 符合当前热键缓存的更多热键
*/
FSViewer_Show(aTemp, aMore)
{
    Global VimD
}

Return
/*
    功能：QuickZ在加载的时候执行此函数
*/
PotPlayerMini64_Init()
{
    Global VimD
}

/*
    功能：每次切换模式的时候执行此函数
*/
PotPlayerMini64_ChangeMode()
{
    Global VimD
}

/*
    功能：按下热键后，热键对应的功能执行前，会运行此函数
    * 默认返回False，功能正常执行。
    * 如果返回True，功能不会执行。
    可以利用这个函数设置自动判断模式
*/
PotPlayerMini64_ActionBefore()
{
    Global VimD
}

/*
    功能：热键对应的功能执行后，会运行此函数。
    函数不需要返回值
    可以利用这个函数来做状态提醒
*/
PotPlayerMini64_ActionAfter()
{
    Global VimD
}

/*
    功能：热键提醒，用于提示当前有效热键
    QuickZ会传递当前有效热键列表到此函数中。所以需要预留两个参数
    aTemp - 当前热键缓存
    aMore - 符合当前热键缓存的更多热键
*/
PotPlayerMini64_Show(aTemp, aMore)
{
    Global VimD
}

Return
/*
    功能：QuickZ在加载的时候执行此函数
*/
QQBrowser_Init()
{
    Global VimD
}

/*
    功能：每次切换模式的时候执行此函数
*/
QQBrowser_ChangeMode()
{
    Global VimD
}

/*
    功能：按下热键后，热键对应的功能执行前，会运行此函数
    * 默认返回False，功能正常执行。
    * 如果返回True，功能不会执行。
    可以利用这个函数设置自动判断模式
*/
QQBrowser_ActionBefore()
{
    Global VimD
}

/*
    功能：热键对应的功能执行后，会运行此函数。
    函数不需要返回值
    可以利用这个函数来做状态提醒
*/
QQBrowser_ActionAfter()
{
    Global VimD
}

/*
    功能：热键提醒，用于提示当前有效热键
    QuickZ会传递当前有效热键列表到此函数中。所以需要预留两个参数
    aTemp - 当前热键缓存
    aMore - 符合当前热键缓存的更多热键
*/
QQBrowser_Show(aTemp, aMore)
{
    Global VimD
}

Return
/*
    功能：QuickZ在加载的时候执行此函数
*/
Global_Init()
{
    Global VimD
}

/*
    功能：每次切换模式的时候执行此函数
*/
Global_ChangeMode()
{
    Global VimD
}

/*
    功能：按下热键后，热键对应的功能执行前，会运行此函数
    * 默认返回False，功能正常执行。
    * 如果返回True，功能不会执行。
    可以利用这个函数设置自动判断模式
*/
Global_ActionBefore()
{
    Global VimD
}

/*
    功能：热键对应的功能执行后，会运行此函数。
    函数不需要返回值
    可以利用这个函数来做状态提醒
*/
Global_ActionAfter()
{
    Global VimD
}

/*
    功能：热键提醒，用于提示当前有效热键
    QuickZ会传递当前有效热键列表到此函数中。所以需要预留两个参数
    aTemp - 当前热键缓存
    aMore - 符合当前热键缓存的更多热键
*/
Global_Show(aTemp, aMore)
{
    Global VimD
}

Return
/*
    功能：QuickZ在加载的时候执行此函数
*/
Foxit_Phantom_Init()
{
   Global VimD
}

/*
    功能：每次切换模式的时候执行此函数
*/
Foxit_Phantom_ChangeMode()
{
    Global VimD
}

/*
    功能：按下热键后，热键对应的功能执行前，会运行此函数
    * 默认返回False，功能正常执行。
    * 如果返回True，功能不会执行。
    可以利用这个函数设置自动判断模式
*/
Foxit_Phantom_ActionBefore()
{
    Global VimD
    ;以下代码实现在查找内容时，自动跳转到普通模式
    ControlGetFocus, ctrl, A
    If RegExMatch(ctrl, "i)Edit")    ;查找时
        Return True
    return False
}

/*
    功能：热键对应的功能执行后，会运行此函数。
    函数不需要返回值
    可以利用这个函数来做状态提醒
*/
Foxit_Phantom_ActionAfter()
{
    Global VimD
}

/*
    功能：热键提醒，用于提示当前有效热键
    QuickZ会传递当前有效热键列表到此函数中。所以需要预留两个参数
    aTemp - 当前热键缓存
    aMore - 符合当前热键缓存的更多热键
*/
Foxit_Phantom_Show(aTemp, aMore)
{
    Global VimD
}

Return
/*
    功能：QuickZ在加载的时候执行此函数
*/
ExcelAll_Init()
{
    Global VimD
}

/*
    功能：每次切换模式的时候执行此函数
*/
ExcelAll_ChangeMode()
{
    Global VimD
}

/*
    功能：按下热键后，热键对应的功能执行前，会运行此函数
    * 默认返回False，功能正常执行。
    * 如果返回True，功能不会执行。
    可以利用这个函数设置自动判断模式
*/
ExcelAll_ActionBefore()
{
    Global VimD

   ;以下代码实现仅在指定区域内里使用VIM模式
     ;excel71,		;单元格区域
     ;netuihwnd2,		;选项卡
     ;netuihwnd4		;垂直滚动条
     ;netuihwnd5		;水平滚动条
    ControlGetFocus, ctrl, A
    If RegExMatch(ctrl, "i)excel71") || RegExMatch(ctrl, "i)netuihwnd2") || RegExMatch(ctrl, "i)netuihwnd4") || RegExMatch(ctrl, "i)netuihwnd5")
        Return false
    return True
}

/*
    功能：热键对应的功能执行后，会运行此函数。
    函数不需要返回值
    可以利用这个函数来做状态提醒
*/
ExcelAll_ActionAfter()
{
    Global VimD
}

/*
    功能：热键提醒，用于提示当前有效热键
    QuickZ会传递当前有效热键列表到此函数中。所以需要预留两个参数
    aTemp - 当前热键缓存
    aMore - 符合当前热键缓存的更多热键
*/
ExcelAll_Show(aTemp, aMore)
{
    Global VimD
}

Return
/*
    功能：QuickZ在加载的时候执行此函数
*/
TOTALCMDAll_Init()
{
    Global VimD
}

/*
    功能：每次切换模式的时候执行此函数
*/
TOTALCMDAll_ChangeMode()
{
    Global VimD
}

/*
    功能：按下热键后，热键对应的功能执行前，会运行此函数
    * 默认返回False，功能正常执行。
    * 如果返回True，功能不会执行。
    可以利用这个函数设置自动判断模式
*/
TOTALCMDAll_ActionBefore()
{
    Global VimD
    QZTC_Init()
    Global TC_SendPos
    Global TCListBox
    WinGet, MenuID, ID, AHK_CLASS #32768
    if MenuID And (TC_SendPos <> 572)
        return True
    ControlGetFocus, ctrl, AHK_CLASS TTOTAL_CMD
    Ifinstring, ctrl, %TCListBox%
        return False
    return True
}

/*
    功能：热键对应的功能执行后，会运行此函数。
    函数不需要返回值
    可以利用这个函数来做状态提醒
*/
TOTALCMDAll_ActionAfter()
{
    Global VimD
}

/*
    功能：热键提醒，用于提示当前有效热键
    QuickZ会传递当前有效热键列表到此函数中。所以需要预留两个参数
    aTemp - 当前热键缓存
    aMore - 符合当前热键缓存的更多热键
*/
TOTALCMDAll_Show(aTemp, aMore)
{
    Global VimD
}

Return
/*
    功能：QuickZ在加载的时候执行此函数
*/
WINWORD_Init()
{
    Global VimD
}

/*
    功能：每次切换模式的时候执行此函数
*/
WINWORD_ChangeMode()
{
    Global VimD
}

/*
    功能：按下热键后，热键对应的功能执行前，会运行此函数
    * 默认返回False，功能正常执行。
    * 如果返回True，功能不会执行。
    可以利用这个函数设置自动判断模式
*/
WINWORD_ActionBefore()
{
    Global VimD
}

/*
    功能：热键对应的功能执行后，会运行此函数。
    函数不需要返回值
    可以利用这个函数来做状态提醒
*/
WINWORD_ActionAfter()
{
    Global VimD
}

/*
    功能：热键提醒，用于提示当前有效热键
    QuickZ会传递当前有效热键列表到此函数中。所以需要预留两个参数
    aTemp - 当前热键缓存
    aMore - 符合当前热键缓存的更多热键
*/
WINWORD_Show(aTemp, aMore)
{
    Global VimD
}

Return
/*
    功能：QuickZ在加载的时候执行此函数
*/
Foxmail_Init()
{
    Global VimD
}

/*
    功能：每次切换模式的时候执行此函数
*/
Foxmail_ChangeMode()
{
    Global VimD
}

/*
    功能：按下热键后，热键对应的功能执行前，会运行此函数
    * 默认返回False，功能正常执行。
    * 如果返回True，功能不会执行。
    可以利用这个函数设置自动判断模式
*/
Foxmail_ActionBefore()
{
    Global VimD
}

/*
    功能：热键对应的功能执行后，会运行此函数。
    函数不需要返回值
    可以利用这个函数来做状态提醒
*/
Foxmail_ActionAfter()
{
    Global VimD
}

/*
    功能：热键提醒，用于提示当前有效热键
    QuickZ会传递当前有效热键列表到此函数中。所以需要预留两个参数
    aTemp - 当前热键缓存
    aMore - 符合当前热键缓存的更多热键
*/
Foxmail_Show(aTemp, aMore)
{
    Global VimD
}

Return
